Lines Matching refs:lines
831 my @lines = map { ( undef, $_ ) } split m|\R|, $line;
834 pop @lines;
835 pop @lines; # Don't forget the undef
837 while (@lines) {
838 if (!defined($lines[0])) {
839 shift @lines;
849 $_ .= shift @lines;
882 @lines = ( @r, @lines );
905 @lines = ( @r, @lines );
947 @lines = ( @r, @lines );
974 @lines = ( @r, @lines );
