in reply to Weird things...
#!/usr/bin/perl $name = 'turd'; $blah = 'sample'; [download]
#!/usr/bin/perl -w use strict; use vars qw($name $blah) require './turd.pl'; [download]