You're opening your output file inside your while loop, so it's getting closed and then wiped out and reopened for each line of your input file. So you're actually getting the size and date of the last file listed in your input file, not the first. Open your output file outside your while loop, as you do with your input file, and that should fix that.
Aaron B.
My Woefully Neglected Blog, where I occasionally mention Perl.
In reply to Re^3: Checking for Files
by aaron_baugher
in thread Checking for Files
by akrrs7
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |