my $username; foreach (@usernames) { if (!exists $usernames{$_}) { $username = $_; last; } }