get a base file name from a file path

use File::Basename;

my $name=basename("c:\\my1\\upmover\\perl\\file.pl");
print "$name\n";

file.pl