Lines Matching refs:owner
21 # information: Portions Copyright [yyyy] [name of copyright owner]
100 # find the owner from the comments
102 my $owner = `grep '$RE' $spec | head -1`;
103 chomp ($owner);
104 if ($owner eq '') {
105 $owner = 'Unknown';
107 $owner =~ s/^#\s*[Oo]wner:\s*(\S+)\s*/$1/;
108 $owners{$spec} = $owner;
125 <tr><td><b>spec file</b></td><td><b>owner</b></td><td><b>copyright file</b></td></tr>
150 <b>Missing copyright files by owner:</b><small>
152 <tr><td><b>owner</b></td><td><b>spec files</b></td></tr>
154 foreach my $owner (uniq sort values %owners) {
157 next if $owners{$spec} ne $owner;