Stopping empty files from been pushed into an array.

ogbalex has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Stopping empty files from been pushed into an array. by GotToBTru (Prior) on May 13, 2015 at 19:48 UTC
Very hard to help when we can't see your code. Be sure to follow these guidelines. Without seeing, I can guess at a solution: test the file size before you do the push. `push @filelist,$filename unless -z $filename;` [download] Dum Spiro Spero	[reply] [d/l]
Re: Stopping empty files from been pushed into an array. by roboticus (Chancellor) on May 13, 2015 at 19:49 UTC
ogbalex: Sure, just don't push the file onto the array if they're empty: `push @array, $file_name unless length($file_contents) < 1;` [download] Update: Corrected len to length. (Too much Python today at work...) ...roboticus When your only tool is a hammer, all problems look like your thumb.	[reply] [d/l]
Re^2: Stopping empty files from been pushed into an array. by Your Mother (Archbishop) on May 13, 2015 at 20:38 UTC
What is `len()`? :P	[reply] [d/l]
Re^3: Stopping empty files from been pushed into an array. by FreeBeerReekingMonk (Deacon) on May 13, 2015 at 22:33 UTC
Why, it is of course: `sub len{ return do { local(@ARGV, $/) = $_[0]; <> } =~ y===c; }` [download] :P Disclaimer: use -s $filename. This code is ineficient and ment as a timtoady	[reply] [d/l]
Re^3: Stopping empty files from been pushed into an array. by roboticus (Chancellor) on May 14, 2015 at 02:43 UTC
Your Mother: len() is a function that gives you the length of things.... ...in python ...roboticus When your only tool is a hammer, all problems look like your thumb.	[reply]