foreach my $file (@$exc) {
    if($_ eq $file) {
        $skip =1;
    }
    last if $skip;
}