($foo, $match_I_want) = split /:/, $_, [2];

##</code><code>##

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

##</code><code>##

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