Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Re: My very confusing questions

by choroba (Bishop)
on Jul 08, 2014 at 21:29 UTC ( #1092802=note: print w/replies, xml ) Need Help??

in reply to My very confusing questions

if no array is given then it uses the default @_
Inside a subroutine, shift and pop operate on @_, but in the main body of a program, they operate on @ARGV, which is what you generally want.

Update: Removed unshift and push as they are different. My mistake.

لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ

Replies are listed 'Best First'.
Re^2: My very confusing questions
by Random_Walk (Prior) on Jul 09, 2014 at 14:52 UTC

    Surely parameterless shift and pop, operate on @ARGV in the main, or @_ in a sub, as described. But unshift and push, unseasoned with parameters, are a syntax error.

    /usr/bin/perl -le '@ARGV=qw(this that more less);pop;shift;print join +"<>", @ARGV;' that<>more /usr/bin/perl -le '@ARGV=qw(this that more less);pop;shift;push;print +join "<>", @ARGV;' Not enough arguments for push at -e line 1, near "push;" /usr/bin/perl -le '@ARGV=qw(this that more less);pop;shift;unshift;pri +nt join "<>", @ARGV;' Not enough arguments for unshift at -e line 1, near "unshift;" /usr/bin/perl -le '@ARGV=qw(this that more less);pop;shift;push "X";pr +int join "<>", @ARGV;' Type of arg 1 to push must be array (not constant item) at -e line 1, +near ""X";" /usr/bin/perl -le '@ARGV=qw(this that more less);pop;shift;unshift "X +";print join "<>", @ARGV;' Type of arg 1 to unshift must be array (not constant item) at -e line +1, near ""X";"

    Or is there a cunning way to make them dance?


    Pereant, qui ante nos nostra dixerunt!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1092802]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (13)
As of 2018-06-25 15:22 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (127 votes). Check out past polls.