how to save output of a command into a hash of arrays

[saapa]

hi all,

i am new to perl...
i am trying to put the output of below command into a hash of arrays...

`find $mypath ! -user mainuser -printf \"\%u \%h\\n\"`;

this command gives output as

john <somepath1>
john <somepath2>
john <somepath3>
james <somepath4>
james <somepath5>


now what i want is to directly make an hash of arrays which stores :

john --> <somepath1>
<sompath2>
<somepath3>

james --> <somepath4>
<somepath5>

is this possible??
thanks in advance for the help.