./test.pl 
Can't localize lexical variable $fred at ./test.pl line 7.
Exit 255