Why Perl Is As It Is

pudge on 2001-11-26T22:59:52

I wanted to find out the largest perl module in the distribution. So I wrote this script in about one minute.

use File::Find; find(sub { next unless /\.pm$/; $file = $File::Find::name, $size = -s _ if -s > $size; }, "Bourque:Applications (Mac OS 9):MacPerl Æ’:lib:"); print "$file: $size\n";

This is why Perl needs to have so many shortcuts. This is why Perl is cool.

FWIW, the answer is CPAN.pm.