Help for this page
Select Code to Download
Select
or
download this
nFor { print map $lists[$_][ $_[$_] ], 0..$#_; } map 0+@$_, @lists;