to github
[svn42.git] / rf433rcv / pc / decode2.pl
diff --git a/rf433rcv/pc/decode2.pl b/rf433rcv/pc/decode2.pl
deleted file mode 100755 (executable)
index 70ce6c2..0000000
+++ /dev/null
@@ -1,7 +0,0 @@
-#!/usr/bin/perl
-use strict;
-print STDERR $ARGV[2]-$ARGV[1], "samples\n";
-my @data =  split //,<>;
-my @samples = $ARGV[0]..$ARGV[1];
-print join '',@data[@samples];
-print STDERR "\n";