$ perl -MFoo -e 1
$