style and efficiency suggestion:
It appears that your code and logic are currently incomplete. However, the first if statement should probably be moved to just after the foreach $log loop. As it's written right now it's independent of the foreach on @surl, so it should be outside of it to simplify the logic and to not needlessly run that foreach multiple times.
And don't forget to "my" your foreach iterator.
foreach my $log ( sort keys %logfiles ) {
next if $log !~ /\./ || $log =~ /^\./;
- Miller