use FindBin; use lib $FindBin::Bin; #ensure we can find ParseUtil use ParseUtil qw(Util1 Util2 Util3 );