push @{ $hash{ $K[ int 3.5*abs sin (0.19634954085+0.39269908170*++$i) ] } }, $_ for @V;