diff options
-rwxr-xr-x | generate_text.pl | 12 |
1 files changed, 0 insertions, 12 deletions
diff --git a/generate_text.pl b/generate_text.pl deleted file mode 100755 index 845fb44..0000000 --- a/generate_text.pl +++ /dev/null @@ -1,12 +0,0 @@ -#!/usr/bin/perl - -$lines = $ARGV[0]; -$chars = $ARGV[1]; - -die unless $lines; -die unless $chars; - -while ($lines--) { - print int(rand(9)) x $chars; - print "\n"; -} |