Help for this page
#!/perl use strict; ... something::todo(arg1,arg2); diffrent::todo(arg3,arg4);
package something; @something::ISA=qw(basePack); ... my $diffrent = new diffrent; $something->act($arg1, $arg2); #something::todo; $diffrent->act($arg3,$arg4); #diffrent::todo;
www.com | www.net | www.org
No recent polls found