next unless $job_B =~ /Out_$tag\.txt$/; #.... until you have checked the whole directory and then goto: beginning.