perl -T -e 'system("echo $foo");'