Help for this page
Select Code to Download
Select
or
download this
push @{ $hash{ $K[ int(++$i/@K)&1 ? @K-1-$i%@K : $i%@K ] } }, $_ for @
+
V;