drop unused, commented code

2014-04-07 09:02:34 +02:00
parent 5dfc68fe85
commit 14f473f4df
1 changed files with 0 additions and 12 deletions
@@ -91,15 +91,3 @@ for(my $i = 0; $i < length($hex); $i += 2) {
 }

 print "\n";
-__END__
-
-for(my $i = 0; $i < length($in); $i += 8) {
-  my $part = substr($in, $i, $i + 8);
-  my $bits = "0b";
-  foreach my $char (split(//, $part)) {
-    $bits .= $encoding{$char};
-  }
-
-  my $num = eval($bits);
-  warn $num;
-}