Public Scratchpad

Download, Select Code To D/L

Help for this page

Select Code to Download

Select or download this

#! perl -w
use File::Basename;
...
my $filename = basename($path);
print $filename;