Unmatched right curly bracket at findfiles.pl line 5, at end of line
syntax error at findfiles.pl line 5, near "}"
findfiles.pl had compilation errors.

##</code><code>##

#!/usr/bin/perl
use strict;
use warnings;
use File::Find;

my $dirphoto = "/home/ww";

my @array;
find(sub { push @array, $File::Find::name }, $dirphoto);

for (@array) { print "$_ \n";}

print "done\n";