$ perl -w -e 'print ">>>$.<<<\n"'
Use of uninitialized value in concatenation (.) or string at -e line 1.
>>><<<
$