Lines Matching refs:line
46 while( my $line = <$nfh> ) {
47 chomp $line;
48 my ( $old, $new ) = ( $line =~ /^($ident)\s+($ident)$/ );
50 die "$0: $datafile:$.: bad input '$line'\n";
90 for my $line (@lines) {
91 if( $line =~ /#include/ ) {
92 $line =~ s/polarssl/mbedtls/;
93 $line =~ s/POLARSSL/MBEDTLS/;
94 push( @out, $line );
98 my @words = ($line =~ /$token/g);
100 if( $checkline eq $line ) {
105 push @{ $warnings{$filename} }, $line;
106 push( @out, $line );