perl -I. -le 'use M1;func()'
Hello