diff options
author | Larry Wall <lwall@netlabs.com> | 1994-05-04 23:00:00 +0000 |
---|---|---|
committer | Larry Wall <lwall@netlabs.com> | 1994-05-04 23:00:00 +0000 |
commit | 85e6fe838fb25b257a1b363debf8691c0992ef71 (patch) | |
tree | fd5340cd6c3bbabfc21d3b0cac48e7ab3a481ebf /Bugs/lcsortdump | |
parent | 2304df62caa7d9be70e8b8bcdb454e139c9c103d (diff) | |
download | perl-5a9.tar.gz |
perl 5.0 alpha 9perl-5a9
[editor's note: the sparc executables have not been included,
and emacs backup files have been removed]
Diffstat (limited to 'Bugs/lcsortdump')
-rw-r--r-- | Bugs/lcsortdump | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/Bugs/lcsortdump b/Bugs/lcsortdump deleted file mode 100644 index 4254305b4f..0000000000 --- a/Bugs/lcsortdump +++ /dev/null @@ -1,6 +0,0 @@ -@S = (0, 1, 2, 3); -for ("A", "D", "b", "c") { $foo{$i++} = $_; } -# for (sort { lc($foo{$a}) cmp lc($foo{$b}) } @S) { print $foo{$_}, "\n"; } -for (sort Alpha @S) { print $foo{$_}, "\n"; } - -sub Alpha { lc($foo{$a}) cmp lc($foo{$b}); } |