I am thinking I will check the file size (not sure how to do this in Perl)...

The -s file test operator will return the size of your file. You may also use the stat function. In general terms, the approach you are contemplated should work, but you should probably use a module such as the one already suggested.