My purpose is that my perl scripts read many text files
So rather than checking each one in each script, I thought I would always make my filename variables always as
"something_file". And have a standard subroutine that checks all %main:: scalar variables =~ /\_file/ and do the checks on each entry (Like file exists, file is readable etc.) .