$ perl -w -e 'print ">>>$.<<<\n"' -Mdiagnostics
>>>0<<<
$