use IO::All; $s < io('file.txt'); print $s; # or # print io('file.txt')->slurp; [download]
In reply to Re^2: Paul Graham on Great Hackers by itub in thread Paul Graham on Great Hackers by biosysadmin