in reply to gimme some sed

use strict;
use warnings;
my $first = shift @ARGV;
my @the_rest = @ARGV;
my $the_rest_string = join " ", @the_rest;

[download]

Replies are listed 'Best First'.
Re^2: gimme some sed
by sh1tn (Priest) on Oct 06, 2006 at 11:33 UTC
    ++ thought shift is acting by default on @ARGV: 
    my $first = shift; #clearer in your way
...

    [download]


[reply]
[d/l]

In Section Seekers of Perl Wisdom