Snake and ladder: Difference between revisions
m
→{{header|Perl}}: fixed <lang> tag
SqrtNegInf (talk | contribs) (Added Perl example) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: fixed <lang> tag) |
||
Line 802:
=={{header|Perl}}==
{{trans|Perl 6}}
<lang perl># board layout
my %snl =( 4, 14, 9, 31, 17, 7, 20, 38, 28, 84, 40, 59, 51, 67, 54, 34,
62, 19, 63, 81, 64, 60, 71, 91, 87, 24, 93, 73, 95, 75, 99, 78);
|