perl -I. -MFoo -e 'Foo->bar'