in reply to
using s/// to remove file extensions
How about using split instead?
($fName, $extension) = split (/\./, $FullFileName);
print scalar $fName;
/- M a r c -/
Of course I'm assuming all files don't have extra periods in them. A module may be best, unless you know what kind of files to expect consistantly.
Priority 1, Priority 2, Priority 3
Priority 1, Priority 0, Priority -1
Urgent, important, favour
Data loss, bug, enhancement
Out of scope, out of budget, out of line
Family, friends, work
Impossible, inconceivable, implemented
Results (60 votes),