Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re^2: Gratuitous use of Perl Prototypes

by leriksen (Curate)
on Nov 09, 2004 at 00:56 UTC ( #406244=note: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download


  1. or download this
    sub PUSH {
      my ($aref, @new) = @_;
    ...
      carp "first parameter must be an array reference" unless ref $aref e
    +q 'ARRAY';
      ...
    }
    
  2. or download this
    sub NAMED_PUSH {
      my(%args) = @_;
    ...
      carp "dest_aref parmeter must be an array reference" unless ref $arg
    +s{dest_aref} eq 'ARRAY';
      ...
    }
    

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://406244]
help
Chatterbox?
[choroba]: Moose setter
[Discipulus]: ;=)
[erix]: that's not a setter but a pointer
[Discipulus]: Perl internals
[erix]: (but what's in a name?)

How do I use this? | Other CB clients
Other Users?
Others about the Monastery: (10)
As of 2017-05-24 07:41 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?