# SYPH2.pm package SYPH2; if(defined $INC{'SYPH1.pm'}) {print "SYPH1.pm loaded\n"} else {print "SYPH1.pm NOT loaded\n"} 1;