use lib $0 =~ m|(.*)/|;