Select Code to Download

$ time perl -e 'open my $fh, "<", "words.txt" or die; my @w = <$fh>;
> my $c;
...
real    0m0.138s
user    0m0.093s
sys     0m0.016s

$ time perl -e 'open my $fh, "<", "words.txt" or die;
> my $c;
...
real    0m0.120s
user    0m0.093s
sys     0m0.015s