Can anyone give me a tip on finding the size of a file with perl? I am using the following method to parse through a list of files within a specific directory after using readdir. foreach $listitem (@contents) { ...do some stuff to each file... } What I'd like to do is skip over any file that has a size of zero. Thanks, Mark.