You can get only the first unique occurance of UID's with a hash. Untested code below. I'm assuming the file has a UID followed by a home path seperated by whitespace.
my %data;
while(<$fileHandle>) {
my($UID, $home) = split /\s/;
$data[$UID] = $home if ( ! defined $data[$UID] );
}
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
