Help for this page
Select Code to Download
Select
or
download this
use File::Basename qw( fileparse ); $flat_file = fileparse($flat_file);