Lines Matching refs:first
272 my($file,$file_name,$hash,$key,$value,$names,$first,$name);
309 $first = $names->[0];
317 $value = $Pc_hash->{$first}->{'NAME'};
324 @n = ( $first, sort keys %k );
325 @{$Pc_hash->{$first}->{'NAME'}} = @n;
329 $Pc_hash->{$first}->{$key} = $value;
333 $Pc_index->{$name} = $first;
336 $Pc_index->{'FIRST'} = $first;
339 Dump_index( "Read_printcap_file: after adding '$first'", %$Pc_index );
341 Dump_pc( "Read_printcap_file: after adding '$first'", %{$Pc_hash->{$name}} );