- or download this
# SYPH1.pm
package SYPH1;
$SYPH1::VERSION = '0.01';
1;
- or download this
# SYPH2.pm
package SYPH2;
if(defined $INC{'SYPH1.pm'}) {print "SYPH1.pm loaded\n"}
else {print "SYPH1.pm NOT loaded\n"}
1;
- or download this
D:\>set PERL5OPT=
...
SYPH1.pm NOT loaded
D:\>