Here is the documentation on it.
( http://www.perldoc.com/perl5.6/pod/perlop.html#qw%2fSTRING%2f )
qw/STRING/
Evaluates to a list of the words extracted out of STRING, using embedded
whitespace as the word delimiters. It can be understood as being roughly
equivalent to:
split(' ',
I've done this several ways, depending on my mood.
1.
@path = split(/\//, $file);
$filename = $path[$#path];
2.
$filename = $1 if ($file =~ m|/([^/]+)$|);
3.
use File::Basename;
$filename = basename($file);
1 uses split and $#array, which can be nasty if someone set $[ to something
other
Oops, you don't need the |more (it's a habit from other things)
But that will give you all the info you need to learn how to use perldoc.
-Original Message-
From: Larry Shatzer [mailto:[EMAIL PROTECTED]]
Sent: Thursday, April 19, 2001 8:52 AM
To: 'Ray Calkins 100660207'; [EMAIL