Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^2: My very confusing questions

by Random_Walk (Prior)
on Jul 09, 2014 at 14:52 UTC ( [id://1092925]=note: print w/replies, xml ) Need Help??


in reply to Re: My very confusing questions
in thread My very confusing questions

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?

Cheers,
R.

Pereant, qui ante nos nostra dixerunt!

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1092925]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others romping around the Monastery: (2)
As of 2024-04-25 19:28 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found