Lines Matching refs:line
114 my $line = defined $_ ? $_ : '';
125 chomp( $line );
135 if( $line =~ /(.*)\t[^\t\$]*$/ ){
136 $line = $1."\t".$default_date;
148 $block{ "$prj\t$file\t$type\t$gid\t$lid\t$helpid\t$platform\t$lang" } = $line ;
157 $block{ "$prj\t$file\t$type\t$gid\t$lid\t$helpid\t$platform\t$lang" } = $line ;
191 my $line = defined $_ ? $_ : '';
201 chomp( $line );
202 $index{ "$prj\t$file\t$type\t$gid\t$lid\t$helpid\t$platform\t$lang" } = $line ;
451 my $line = defined $_ ? $_ : '';
461 chomp( $line );
466 … $fallbackhashhash_ref->{ $cur_lang }{ $prj.$gid.$lid.$file.$type.$platform.$helpid } = $line ;
475 foreach my $line ( keys( %{$fallbackhashhash_ref->{ $cur_lang } } )) {
478 … print ALLPARTICLES_MERGED ( $fallbackhashhash_ref->{ $cur_lang }{ $line }, "\n" );
593 foreach my $line ( @{$curlist} ){
594 print DESTFILE $line;
625 my $line = defined $_ ? $_ : '';
639 push @good_lines , $line;
642 print STDERR "BADLINE: $line\n";
647 push @good_lines , $line;
677 my $line;
679 $line = $_;
680 if( $line =~ /^[^\#]/ ){
681 push @lines , $line;
752 my $line;
755 $line = $fallbackhashhash_ref->{ $cur_fallback }{ $key };
756 if( $line =~ /$sdf_regex/ ){
839 my $line = defined $_ ? $_ : '';
850 …$lang/i || $isolang=~ /all/i ) { $block{$prj.$gid.$lid.$file.$type.$platform.$helpid } = $line ; }
868 my $line = defined $_ ? $_ : '';
878 chomp( $line );
882 … $fallbackhashhash_ref->{ $isolang }{ $prj.$gid.$lid.$file.$type.$platform.$helpid } = $line ;
904 my $line = defined $_ ? $_ : '';
914 chomp( $line );
915 …) { $fallbackhashhash_ref->{ $isolang }{ $prj.$gid.$lid.$file.$type.$platform.$helpid } = $line ;