Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

Re^3: About inheritence ? and Autoload ?

by kyle (Abbot)
on Nov 25, 2009 at 13:24 UTC ( #809335=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    my $subpackage = __PACKAGE__ . '::Command';
    my $test_command = $subpackage->new(@ARGV);
    
  2. or download this
    sub UNIVERSAL::subpackage { join '::', @_ }
    
    ...
    Foo->check();
    __END__
    I am: Foo::Command
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://809335]
help
Chatterbox?
[karlgoethebier]: no saturday night special?
[karlgoethebier]: AKA bla, bla
LanX night fever ... ha ha ha ha staying alive ...
[karlgoethebier]: No sack of rice fell over in China?
[karlgoethebier]: PM is going down...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (8)
As of 2017-10-21 14:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (270 votes). Check out past polls.

    Notices?