print map { @{ $valarray[$_] } , $/ } 0..$#valarray;