Think about Loose Coupling | |
PerlMonks |
Re: Search a string from beginning or endby chipmunk (Parson) |
on Dec 28, 2001 at 07:08 UTC ( [id://134800]=note: print w/replies, xml ) | Need Help?? |
Instead of basename, you could use fileparse, which is also part of the File::Basename module. For example:
($base,$path,$suffix) = fileparse($file, '\.[^.]*');
In Section
Seekers of Perl Wisdom
|
|