perl -e 'print "\$" . "x" x 257 . " = 1"' > 257.pl
perl 257.pl

##</code><code>##

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