Lines Matching refs:line
184 my $line = $_;
186 $line =~ s/\s*\n?$//g;
187 $line =~ s/^\s*//g;
188 $line =~ s/\s+/ /g;
190 next if ($line =~ m/^\s*#/);
191 next if ($line =~ m/^\s*$/);
193 my @words = split(" ", $line);
209 my $line = $_;
211 $line =~ s/\s*\n?$//;
212 $line =~ s/^\s*//;
213 $line =~ s/\s+$//;
214 $line =~ s/#.*$//;
216 next if ($line =~ m/^\s*$/);
217 if (rfc822_valid($line)) {
218 push(@ignore_emails, $line);
346 my $line = $_;
347 chomp $line;
349 if ($line =~ m/^([A-Z]):\s*(.*)/) {
367 push(@typevalue, $line);
370 push(@self_test_info, {file=>$file, linenr=>$i, line=>$line});
533 foreach my $line (keys %keyword_hash) {
534 if ($text =~ m/$keyword_hash{$line}/x) {
535 push(@keyword_tvi, $line);
583 foreach my $line (keys %keyword_hash) {
584 if ($patch_line =~ m/${patch_prefix}$keyword_hash{$line}/x) {
585 push(@keyword_tvi, $line);
657 $x->{line} =~ /^\S[^:]/ &&
659 $self_test_info[$index]->{line} =~ /^([A-Z]):\s*\S/) {
667 push(@section_headers, $x->{line});
671 $self_test_info[$nextline]->{line} =~ /^([A-Z]):\s*(\S.*)/) {
695 next if ($x->{line} !~ /^([A-Z]):\s*(.*)/);
786 my $line = $typevalue[$i];
787 if ($line =~ m/^([A-Z]):\s*(.*)/) {
804 my $line = $typevalue[$i];
805 if ($line =~ m/^([A-Z]):\s*(.*)/) {
853 my $line = $typevalue[$i];
854 if ($line =~ m/^([A-Z]):\s*(.*)/) {
868 my $line = $typevalue[$i];
869 if ($line =~ m/^([A-Z]):\s*(.*)/) {
899 foreach my $line (sort {$hash{$b} <=> $hash{$a}} keys %hash) {
900 add_categories($line);
903 my $start = find_starting_index($line);
904 my $end = find_ending_index($line);
906 my $line = $typevalue[$i];
907 if ($line =~ /^[FX]:/) { ##Restore file patterns
908 $line =~ s/([^\\])\.([^\*])/$1\?$2/g;
909 $line =~ s/([^\\])\.$/$1\?/g; ##Convert . back to ?
910 $line =~ s/\\\./\./g; ##Convert \. to .
911 $line =~ s/\.\*/\*/g; ##Convert .* to *
913 my $count = $line =~ s/^([A-Z]):/$1:\t/g;
915 print("$line\n");
925 foreach my $line (@keyword_tvi) {
926 add_categories($line);
1389 my ($line, $role) = @_;
1391 my ($name, $address) = parse_email($line);
1428 my ($line, $role) = @_;
1430 my ($name, $address) = parse_email($line);
1484 my ($line) = @_;
1486 my ($name, $address) = parse_email($line);
1514 foreach my $line (@addresses) {
1515 push(@mapped_emails, mailmap_email($line));
1628 foreach my $line (@lines) {
1629 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
1650 foreach my $line (@lines) {
1651 if ($line =~ m/$VCS_cmds{"blame_commit_pattern"}/) {
2060 foreach my $line (@lines) {
2061 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2066 push(@commits, $1) if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2067 push(@subjects, $1) if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2092 foreach my $line (@lines) {
2093 $commit = $1 if ($line =~ m/$VCS_cmds{"commit_pattern"}/);
2094 $subject = $1 if ($line =~ m/$VCS_cmds{"subject_pattern"}/);
2095 if ($line =~ /^[ \t]*${signature_pattern}.*\@.*$/) {
2096 my @signatures = ($line);
2146 foreach my $line (sort {$hash{$b} <=> $hash{$a}} keys %hash) {
2147 my $sign_offs = $hash{$line};
2151 next if (ignore_email_address($line));
2156 push_email_address($line, '');
2159 add_role($line, "$role:$sign_offs/$divisor=$fmt_percent%");
2161 add_role($line, $role);
2321 foreach my $line (@lines) {
2322 if ($line =~ m/$VCS_cmds{"author_pattern"}/) {
2486 foreach my $line (@parms) {
2487 print("${line}\n");