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

Re^3: trouble understanding code, and shift() w.o args

by GotToBTru (Prior)
on Aug 04, 2011 at 16:47 UTC ( #918588=note: print w/replies, xml ) Need Help??

in reply to Re^2: trouble understanding code, and shift() w.o args
in thread trouble understanding code, and shift() w.o args

Yes, that's how you'd add a third argument. You would need to also add a third shift in the subroutine to use it.

Perl's handling of parameters to subroutines is strange; every other language I have used requires the parameters be listed in the subroutine definition. I have often seen

sub translate { my ($noun, $verb, $object) = @_; my $german = "$noun $object $verb"; return($german); }

in order to document what the subroutine expects: 1) three arguments, 2) in the order noun, verb, object. Also, that would be less confusing to a novice Perl programmer because it explicitly names @_, instead of assuming you know about it. Which, of course, now you do.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://918588]
[erix]: ( median troll aka 'the bird' )

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (8)
As of 2018-06-21 16:38 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (118 votes). Check out past polls.