Help for this page

Select Code to Download

Select or download this

my $content = slurp 'file';

print size($content),"\n";

print total_size([split m{\p{IsSpace}}ms, $content]),"\n";