Help for this page
#!/usr/bin/perl use strict; ... $object->test; }
package demo1; ... print "demo1\n"; } 1;
package demo2; ... print "demo2\n"; } 1;
my $temp = "demo1.pm"; require $templ