perl -e 'use lib $ENV{PWD}; use MyA;' Prototype mismatch: sub MyA::with (@) vs (&;$) at MyA.pm line 4