@arr = $p{$num};