use File::Spec; use File::Basename qw(dirname); use lib dirname(File::Spec->rel2abs(__FILE__)); use ...