summaryrefslogtreecommitdiff
path: root/ics-openvpn-stripped/main/lzo/util/shortf.pl
diff options
context:
space:
mode:
authorParménides GV <parmegv@sdf.org>2014-12-15 16:22:58 +0100
committerParménides GV <parmegv@sdf.org>2014-12-15 16:22:58 +0100
commit18fef7c99aa36b3e5622b3865f36d78d0879e92d (patch)
tree7a04fc87318d5008bbc1f1ac145ebb505bb5238c /ics-openvpn-stripped/main/lzo/util/shortf.pl
parent56fe0400b8983ce57112ed5a0f993985a87741c0 (diff)
parent33c5958a18599267820f73b151d8161d83f93d88 (diff)
Merge branch 'research/Test-on-Android-5-#6543' into develop
Diffstat (limited to 'ics-openvpn-stripped/main/lzo/util/shortf.pl')
-rw-r--r--ics-openvpn-stripped/main/lzo/util/shortf.pl31
1 files changed, 0 insertions, 31 deletions
diff --git a/ics-openvpn-stripped/main/lzo/util/shortf.pl b/ics-openvpn-stripped/main/lzo/util/shortf.pl
deleted file mode 100644
index 3e447cdd..00000000
--- a/ics-openvpn-stripped/main/lzo/util/shortf.pl
+++ /dev/null
@@ -1,31 +0,0 @@
-#! /usr/bin/perl
-##
-## vi:ts=4
-##
-##---------------------------------------------------------------------------##
-##
-## Author:
-## Markus F.X.J. Oberhumer <markus@oberhumer.com>
-##
-## Description:
-## Create short files for compression test
-##
-## Copyright (C) 1996-2014 Markus Franz Xaver Johannes Oberhumer
-##
-##---------------------------------------------------------------------------##
-
-$c = "ABCDEFGHIJKLMNOPQRSTUVWXYZ";
-$c = "\x00\x01\x02";
-$c = "\x00";
-
-$x = $c x 1024;
-
-for $i (0 .. 50) {
- $name = sprintf("f%04d.dat",$i);
- open(OUTFILE,">$name") || die "$0: cannot open '$name': $!";
- binmode(OUTFILE);
- print OUTFILE substr($x,0,$i);
- close(OUTFILE);
-}
-
-exit(0);