Next | Program Repair Shop | 237 |
Which is better?
while (<INFILE>) { exit if ( /^SCAN_CELLS/); last if /CHAIN_TEST/; } while (<INFILE>) { chomp; last if ( /^SCAN_CELLS/); if (/apply/) {
while (<INFILE>) { chomp; last if ( /^SCAN_CELLS/); $chain_test=1 if (/CHAIN_TEST/);
if (/apply/ && ($chain_test)) {
continued...
Next | Copyright © 2002 M. J. Dominus |