Select Code to Download

perl -MTie::File -MFcntl=O_RDONLY -le 'tie @array, "Tie::File", shift,
+ mode => O_RDONLY or die $!; print scalar @array' /etc/hosts