In the event you cannot use any other modules (as seems to be common with questions of this sort), and you want the file name, with extention ... you could use :

my $file = $full_name;
$file =~ s!.*\\!!g;
[download]

I think this is covered in The Perl Cookbook quite well.

---

from the frivolous to the serious