Reaped: perl challenge 3

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

Replies are listed 'Best First'.
Re: perl challenge 3 by stevieb (Canon) on Dec 15, 2015 at 23:51 UTC
Monks... Please see Re: perl challenge 2	[reply]
Re^2: perl challenge 3 by FreeBeerReekingMonk (Deacon) on Dec 16, 2015 at 00:42 UTC
awww... and here I had this nice Perl script: use warnings; use strict; print `find . -type f -size +500k` [download]	[reply] [d/l]
Re^3: perl challenge 3 by johnrock47 (Initiate) on Dec 16, 2015 at 00:54 UTC
`#!/usr/bin/perl use File::Find::Rule; use warnings; my $filelist; sub buildFile { open ($filelist, ">", "filelist.txt") \|\| die $!; # File find rule and # Provide specific list of directories to scan my $SubDirs= File::Find::Rule->directory->in('etc', 'dev', 'bin'); + # interpret Size Method and stored the list on @files my @files = File::Find::Rule->size('500')->in($SubDirs); print $filelist map { "$_\n" } @files; return \$filelist; }` [download] this is what i had can someone correct me	[reply] [d/l]
Re^4: perl challenge 3 by FreeBeerReekingMonk (Deacon) on Dec 16, 2015 at 01:14 UTC
Re^5: perl challenge 3 by johnrock47 (Initiate) on Dec 16, 2015 at 01:48 UTC
Some notes below your chosen depth have not been shown here
Re^4: perl challenge 3 by Anonymous Monk on Dec 16, 2015 at 01:15 UTC
Re^5: perl challenge 3 by johnrock47 (Initiate) on Dec 16, 2015 at 01:18 UTC
Some notes below your chosen depth have not been shown here
Re^3: perl challenge 3 by stevieb (Canon) on Dec 16, 2015 at 03:34 UTC
LOL... I just had beer come out my nose. Is that called irony? ;)	[reply]
Re^4: perl challenge 3 by FreeBeerReekingMonk (Deacon) on Dec 18, 2015 at 00:39 UTC