Lines Matching refs:l1
441 # l1: remaining lines of the 1st text621 my @l1;622 my @more_merged_lines = do_merge_comments (\@l1,640 my $l1 = "$l0";641 $l1 =~ s/\s+/ /g;642 $l1 =~ s/^ //g;643 chomp ($l1);644 $l1 =~ s/ $//g;645 $l1 = lc ($l1);646 push (@norm_lines1, $l1);