It gives me an error like no &wanted subroutine given at /usr/share/perl/5.18/File/Find.pm line 1073. NO IDEA WHY?
#!/usr/bin/perl use File::Find; use strict; use warnings; my $path = shift || '.'; find($path); find( sub { return unless -r && -f; my $size = -s; print "$File::Find::name $size\n" if $size > 51200; }, $path )
In reply to Re^2: Hi Monks could you pls help Perl dummy user
by sibyurik
in thread Hi Monks could you pls help Perl dummy user
by sibyurik
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |