Item12952: Use File::Basename to parse

Thanks WillNorris for the point-out.