- or download this
$ cat pm_1027453.dat
line1
line2
line3
- or download this
$ perl -Mstrict -Mwarnings -E '
say do { local $/; <> } =~ /(.*)\Z/m;
' pm_1027453.dat
line3
- or download this
$ perl -Mstrict -Mwarnings -E '
use Tie::File;
...
untie @lines;
'
line3