perl eval.pl 'hehe/; print "Hello there!\n"; unlink "./eval.pl"; q/foo'