perl -Mlib=. -MFoo::Bar -e 'print barfoo("blah");'