Re: split to get the dir name

open(LS, 'ls -l|') or die "Cannot open 'ls -l' for reading\n";

while (<LS>)
{
    chomp; #Added after some thought.
    my $filename = (split ' ', $_)[-1];
    print "$filename\n";
}

close LS;
[download]

There's a whole bunch of Perl idioms in that line. split on ' ' is magical. It does the same thing as /\s+/. Negative indices for arrays count from the end. So, index -1 is the last element. I'm also using an implicit list populated with the result of the split.

------
We are the carpenters and bricklayers of the Information Age.

The idea is a little like C++ templates, except not quite so brain-meltingly complicated. -- TheDamian, Exegesis 6

Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

Comment on Re: split to get the dir name Select or Download Code

Replies are listed 'Best First'.

Re: Re: split to get the dir name
by dvergin (Monsignor) on Sep 29, 2003 at 18:56 UTC

dragonchild

my $filename = (split ' ', $_)[-1];

But what if the filename contains a space?

------------------------------------------------------------
"Perl is a mess and that's good because the
problem space is also a mess." - Larry Wall

[reply]

Re3: split to get the dir name

by dragonchild (Archbishop) on Sep 29, 2003 at 19:02 UTC

split

substr

------
We are the carpenters and bricklayers of the Information Age.

The idea is a little like C++ templates, except not quite so brain-meltingly complicated. -- TheDamian, Exegesis 6

Please remember that I'm crufty and crochety. All opinions are purely mine and all code is untested, unless otherwise specified.

[reply]

Re: Re3: split to get the dir name

by Plankton (Vicar) on Sep 29, 2003 at 19:27 UTC

Nonsense. You never liked me anyway. You wouldn’t even come to my birthday party!

[reply]

Re5: split to get the dir name

by dragonchild (Archbishop) on Sep 29, 2003 at 19:30 UTC

Re: Re5: split to get the dir name

by Plankton (Vicar) on Sep 29, 2003 at 19:39 UTC

Some notes below your chosen depth have not been shown here

Re: Re: split to get the dir name
by Plankton (Vicar) on Sep 29, 2003 at 15:40 UTC

update

update again

open(LS, 'ls|') or die "Cannot open 'ls' for reading\n";

while (<LS>)
{
    chomp; #Added after some thought.
    print "$_\n";
}

close LS;
[download]

You can't do this to me! I went to college!

[reply]
[d/l]


The stupid question is the question not asked
	PerlMonks