Help for this page
$ perl -wlne '$x=split'
$ perl -MO=Deparse -Mstrict -wlne '=split' BEGIN { $^W = 1; } ... chomp $_; } -e syntax OK