package MyPackage;
$is_require = (caller(0))[7];

if($is_require) {
    print "I'm a module!\n";
} else {
    print "I'm a program!\n";
}