Why Perl Is As It Is

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.