perl -I. -le 'use M1;func()'
Imported
Undefined subroutine &main::func called at -e line 1.