diff options
| author | Toby Goodwin <toby@paccrat.org> | 2015-05-16 11:31:54 +0100 |
|---|---|---|
| committer | Toby Goodwin <toby@paccrat.org> | 2015-05-16 21:23:26 +0100 |
| commit | 3c26aae11e1f8e8afc788eb8694cac152db7f4fc (patch) | |
| tree | bd7a94f710954e8f4b48b5bde45083b7991ae51d /random.pl | |
| parent | a63fdbc28b31e425019db3125764481942fa734e (diff) | |
remove some old / odd files
Diffstat (limited to 'random.pl')
| -rw-r--r-- | random.pl | 15 |
1 files changed, 0 insertions, 15 deletions
diff --git a/random.pl b/random.pl deleted file mode 100644 index 90998d5..0000000 --- a/random.pl +++ /dev/null @@ -1,15 +0,0 @@ -#! /usr/bin/perl - -$count = 10; -$size = rand(1000); - -for ($i = 0; $i < $count; ++$i) { - open OUT, "> t$i" or die; - for ($j = 0; $j < $size; ++$j) { - printf OUT "%c", rand(256); - } - close OUT; - $cmd = "./rc t$i"; - print $cmd, "\n"; - system $cmd; -} |