(undef, $match_I_want) = split /:/, $_, 2;

##</code><code>##

($user) = split /:/, $_, [1];
($temp, $foo{$user}) = split /:/, $_, [2];

##</code><code>##

($user,$name) = split /:/, $_, 2;
$name_lookup{$user} = $name;