- or download this
package testpack ;
use strict ;
...
}
1;
- or download this
use strict ;
BEGIN{$Exporter::Verbose=1}
...
print "I\'m before the sub and xyz = $xyz \n" ;
&rtine ;
print "I\'m after the sub and xyz = $xyz \n" ;
- or download this
Exporter::import('testpack', '&rtine') called at E:\Sites\packnew\cgi-
+bin\test.pl