Lines Matching refs:line
17 while(my $line = <TEST_DATA>)
19 next if ($line !~ /^\[/);
20 ($val) = ($line =~ /\[$name\s\=\s(\w+)\]/);
31 my $line;
33 while($line = <TEST_DATA>)
35 next if($line !~ /=/);
39 ($val) = ($line =~ /^$name = (\w+)/);
48 my $line;
50 while($line = <TEST_DATA>)
52 next if($line !~ /=/ && $line !~ /FAIL/);
56 ($val) = ($line =~ /^$name = (\w+)/) if ($line =~ /=/);
62 while (my $line = <TEST_DATA>)