use File::Basename;
my $file = basename($path);