Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid
 
PerlMonks  

perlfunc:unshift

by gods
on Aug 24, 1999 at 22:41 UTC ( #167=perlfunc: print w/replies, xml ) Need Help??

unshift

See the current Perl documentation for unshift.

Here is our local, out-dated (pre-5.6) version:


unshift - prepend more elements to the beginning of a list



unshift ARRAY,LIST



Does the opposite of a shift(). Or the opposite of a push(), depending on how you look at it. Prepends list to the front of the array, and returns the new number of elements in the array.

    unshift(ARGV, '-e') unless $ARGV[0] =~ /^-/;

Note the LIST is prepended whole, not one element at a time, so the prepended elements stay in the same order. Use reverse() to do the reverse.


Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[Discipulus]: while (readdir DIR) was wrong too; it is while ($_ = readdir DIR)
[Corion]: Discipulus: I have to admit that nowadays I either use Path::Class or use File::Find or simply File::Glob:: bsd_glob to read a directory, depending on how fancy my needs are
[shmem]: Discipulus: while (readdir DIR) works fine
[Discipulus]: Eataly vs World(coffe) ;=)
[Discipulus]: shemem i wrote it directly.. but when i tested it i got a lot of 'undefined value..'
[Corion]: Oh, poor Trump can't get a break. Even the Vatican only sends the second in command to greet him...
[shmem]: Discipulus: readdir has the same semantics as readline (a.k.a <>). Have another coffee ☕ ;-)
[Discipulus]: ah! just with my old system perl (5.8.8) was needed

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (8)
As of 2017-05-26 07:30 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?