perl -e 'print "\$" . "x" x 258 . " = 1"' > 258.pl
perl 278.pl
Identifier too long at 258.pl line 1.