Lines Matching refs:line
196 my $line = $_;
198 $line =~ s/\s*\n?$//g;
199 $line =~ s/^\s*//g;
200 $line =~ s/\s+/ /g;
202 next if ($line =~ m/^\s*#/);
203 next if ($line =~ m/^\s*$/);
205 my @words = split(" ", $line);
221 my $line = $_;
223 $line =~ s/\s*\n?$//;
224 $line =~ s/^\s*//;
225 $line =~ s/\s+$//;
226 $line =~ s/#.*$//;
228 next if ($line =~ m/^\s*$/);
229 if (rfc822_valid($line)) {
230 push(@ignore_emails, $line);
368 my $line = $_;
369 chomp $line;
371 if ($line =~ m/^([A-Z]):\s*(.*)/) {
389 push(@typevalue, $line);
392 push(@self_test_info, {file=>$file, linenr=>$i, line=>$line});
569 foreach my $line (keys %keyword_hash) {
570 if ($text =~ m/$keyword_hash{$line}/x) {
571 push(@keyword_tvi, $line);
616 foreach my $line (keys %keyword_hash) {
617 if ($patch_line =~ m/${patch_prefix}$keyword_hash{$line}/x) {
618 push(@keyword_tvi, $line);
702 $x->{line} =~ /^\S[^:]/ &&
704 $self_test_info[$index]->{line} =~ /^([A-Z]):\s*\S/) {
712 push(@section_headers, $x->{line});
716 $self_test_info[$nextline]->{line} =~ /^([A-Z]):\s*(\S.*)/) {
740 next if ($x->{line} !~ /^([A-Z]):\s*(.*)/);
831 my $line = $typevalue[$i];
832 if ($line =~ m/^([A-Z]):\s*(.*)/) {
849 my $line = $typevalue[$i];
850 if ($line =~ m/^([A-Z]):\s*(.*)/) {
900 my $line = $typevalue[$i];
901 if ($line =~ m/^([A-Z]):\s*(.*)/) {
915 my $line = $typevalue[$i];
916 if ($line =~ m/^([A-Z]):\s*(.*)/) {
946 foreach my $line (sort {$hash{$b} <=> $hash{$a}} keys %hash) {
947 add_categories($line, "");
950 my $start = find_starting_index($line);
951 my $end = find_ending_index($line);
953 my $line = $typevalue[$i];
954 if ($line =~ /^[FX]:/) { ##Restore file patterns
955 $line =~ s/([^\\])\.([^\*])/$1\?$2/g;
956 $line =~ s/([^\\])\.$/$1\?/g; ##Convert . back to ?
957 $line =~ s/\\\./\./g; ##Convert \. to .
958 $line =~ s/\.\*/\*/g; ##Convert .* to *
960 my $count = $line =~ s/^([A-Z]):/$1:\t/g;
962 print("$line\n");
974 foreach my $line (@keyword_tvi) {
975 add_categories($line, ":Keyword:$keyword_hash{$line}");
1428 my ($line, $role) = @_;
1430 my ($name, $address) = parse_email($line);
1467 my ($line, $role) = @_;
1469 my ($name, $address) = parse_email($line);
1523 my ($line) = @_;
1525 my ($name, $address) = parse_email($line);
1553 foreach my $line (@addresses) {
1554 push(@mapped_emails, mailmap_email($line));
1667 foreach my $line (@lines) {
1668 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
1689 foreach my $line (@lines) {
1690 if ($line =~ m/$VCS_cmds{"blame_commit_pattern"}/) {
2126 foreach my $line (@lines) {
2127 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2132 push(@commits, $1) if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2133 push(@subjects, $1) if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2158 foreach my $line (@lines) {
2159 $commit = $1 if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2160 $subject = $1 if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2161 if ($line =~ /^[ \t]*${signature_pattern}.*\@.*$/) {
2162 my @signatures = ($line);
2212 foreach my $line (sort {$hash{$b} <=> $hash{$a}} keys %hash) {
2213 my $sign_offs = $hash{$line};
2217 next if (ignore_email_address($line));
2222 push_email_address($line, '');
2225 add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
2227 add_role($line, $role);
2387 foreach my $line (@lines) {
2388 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2556 foreach my $line (@parms) {
2557 print("${line}\n");