use File::Basename; use File::Spec::Functions; use lib catdir( dirname( $FindBin::RealBin ), 'lib' );