diff --git a/createEspFs.pl b/createEspFs.pl
deleted file mode 100644
index 1612098..0000000
--- a/createEspFs.pl
+++ /dev/null
@@ -1,114 +0,0 @@
-#!/usr/bin/perl
-
-use strict;
-use Data::Dumper;
-
-my $dir = shift @ARGV;
-my $out = shift @ARGV;
-
-my $espfs = '';
-
-my @structured = read_dir_structure($dir, "");
-
-for my $file (@structured)
-{
- my $flags = 0;
- my $name = $file;
- my $compression = 0;
-
- if( $name =~ /\.gz$/ )
- {
- $flags |= 2;
- $name =~ s/\.gz$//;
- }
-
- my $head = 'esp-link';
-
- open IF, "<", "$dir/$file" or die "Can't read file: $!";
- my @fc = ;
- close(IF);
- my $cnt = join("", @fc);
-
- if( $name =~ /\.html$/ )
- {
- if( ! ( $flags & 2 ) )
- {
- $cnt = "$head$cnt";
- }
- else
- {
- printf("TODO: prepend headers to GZipped HTML content!\n");
- }
- }
-
- $name .= chr(0);
- $name .= chr(0) while( (length($name) & 3) != 0 );
-
- my $size = length($cnt);
-
- $espfs .= "ESfs";
- $espfs .= chr($flags);
- $espfs .= chr($compression);
- $espfs .= chr( length($name) & 255 );
- $espfs .= chr( length($name) / 256 );
- $espfs .= chr( $size & 255 );
- $espfs .= chr( ( $size / 0x100 ) & 255 );
- $espfs .= chr( ( $size / 0x10000 ) & 255 );
- $espfs .= chr( ( $size / 0x1000000 ) & 255 );
- $espfs .= chr( $size & 255 );
- $espfs .= chr( ( $size / 0x100 ) & 255 );
- $espfs .= chr( ( $size / 0x10000 ) & 255 );
- $espfs .= chr( ( $size / 0x1000000 ) & 255 );
-
- $espfs .= $name;
-
-
-
- $cnt .= chr(0) while( (length($cnt) & 3) != 0 );
- $espfs .= $cnt;
-}
-
-$espfs .= "ESfs";
-$espfs .= chr(1);
-for(my $i=0; $i < 11; $i++)
-{
- $espfs .= chr(0);
-}
-
-open FH, ">", $out or die "Can't open file for write, $!";
-print FH $espfs;
-close(FH);
-
-
-exit(0);
-
-sub read_dir_structure
-{
- my ($dir, $base) = @_;
-
- my @files;
-
- opendir my $dh, $dir or die "Could not open '$dir' for reading: $!\n";
-
- while (my $file = readdir $dh) {
- if ($file eq '.' or $file eq '..') {
- next;
- }
-
- my $path = "$dir/$file";
- if( -d "$path" )
- {
- my @sd = read_dir_structure($path, "$base/$file");
- push @files, @sd ;
- }
- else
- {
- push @files, "$base/$file";
- }
- }
-
- close( $dh );
-
- $_ =~ s/^\/// for(@files);
- return @files;
-}