Improve the parsing of the script location to determine the location of .txt files using File::Basename. Should be platform safe as $program_path will include trailing path separator.

(binary:application/vnd.ms-excel.sheet.macroEnabled.12)