diff options
Diffstat (limited to '')
| -rw-r--r-- | src/lib/libcrypto/util/tab_num.pl | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/src/lib/libcrypto/util/tab_num.pl b/src/lib/libcrypto/util/tab_num.pl deleted file mode 100644 index a81ed0edc2..0000000000 --- a/src/lib/libcrypto/util/tab_num.pl +++ /dev/null | |||
| @@ -1,17 +0,0 @@ | |||
| 1 | #!/usr/local/bin/perl | ||
| 2 | |||
| 3 | $num=1; | ||
| 4 | $width=40; | ||
| 5 | |||
| 6 | while (<>) | ||
| 7 | { | ||
| 8 | chop; | ||
| 9 | |||
| 10 | $i=length($_); | ||
| 11 | |||
| 12 | $n=$width-$i; | ||
| 13 | $i=int(($n+7)/8); | ||
| 14 | print $_.("\t" x $i).$num."\n"; | ||
| 15 | $num++; | ||
| 16 | } | ||
| 17 | |||
