Lines Matching refs:line
32 while(my $line = <TEST_DATA>)
34 next if ($line !~ /^\[/);
35 ($val) = ($line =~ /\[$name\s\=\s(\w+)\]/);
46 my $line;
48 while($line = <TEST_DATA>)
50 next if($line !~ /=/);
54 ($val) = ($line =~ /^$name = (\w+)/);
63 my $line;
65 while($line = <TEST_DATA>)
67 next if($line !~ /=/ && $line !~ /FAIL/);
71 ($val) = ($line =~ /^$name = (\w+)/) if ($line =~ /=/);
77 while (my $line = <TEST_DATA>)