Re^2: extract file name from a dynamic path

in reply to Re: extract file name from a dynamic path
in thread extract file name from a dynamic path

john@perl:~$ perl -le'
my $file_name = q[];
$tst = q[test\test web\test libb\file.-finaltestfla.jar];

$file_name = $1 if ($tst =~ m/\A\S+\\(.*?\.jar)\z/i);

print $file_name . "\n" . $tst;
'
test web\test libb\file.-finaltestfla.jar
test\test web\test libb\file.-finaltestfla.jar
[download]

Comment on Re^2: extract file name from a dynamic path Download Code

Replies are listed 'Best First'.
Re^3: extract file name from a dynamic path by dani_cv (Acolyte) on Sep 06, 2008 at 18:57 UTC
Thank you all!	[reply]
Re^3: extract file name from a dynamic path by SFLEX (Chaplain) on Sep 06, 2008 at 20:49 UTC
the original path didn't have spaces	[reply]

In Section Seekers of Perl Wisdom