foreach (@dirarray) { 
my $filepage = $_;
..
}