Help for this page
c:\@Work\Perl\monks>perl -wMstrict -le "my @shapes = ( ... 'c' 'd' 'e' 'f' 'g' 'h' 'i' 'j' 'k' 'triangle' 'polygon' 'c' 'd' 'e' 'f' 'g' 'h' 'i' 'j' 'k'
c:\@Work\Perl\monks>perl -wMstrict -MData::Dump -le "my @shapes = ( ... dd \@new_ra; " [["c" .. "k"], ["triangle", "polygon"], ["c" .. "k"]]