Help for this page
Select Code to Download
Select
or
download this
open(FOO, '-|') || exec 'cat', '-n', $file;