That's an icky and unreliable way to get the filename from a path (my repentance for using it in the past is showing).

File::Basename, File::Spec and URI::file are more portable.

But, for another quicky that may or may not be more legible (it's a common idiom), this will also work for *nix and MS paths:

my ($fname) = $fullpath =~ m/([^\\|\/]+)$/;
[download]

mkmcconn
update: modified my tone and added a module