$ perl -c -e " foo(1); "
-e syntax OK