I'm interested to hear from some other monks.while(1) { begining: print "A\n"; while (my $job = read_dir("G:/Input")) { print "B\n"; next unless $job =~ /(.{1,36})\.txt$/; my $tag = $1; ##'when you have checked all the files' GOTO beginning while (my $job = read_dir(G:/Output")) { print "D\n";
In reply to Re: Caught in a loop
by cbrandtbuffalo
in thread Caught in a loop
by Win
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |