Help for this page

Select Code to Download

Select or download this

use File::Basename ();
local *file_basename = \&File::Basename::basename;

say file_basename( $0 );