Langton's ant: Difference between revisions
→{{header|Perl}}
(→{{header|Perl}}: Add Perl 6.) |
|||
Line 1,345:
$dir = ($dir - 1) % @dirs;
}
}
print "Out of bounds after $move moves at ($x, $y)\n";
|
(→{{header|Perl}}: Add Perl 6.) |
|||
Line 1,345:
$dir = ($dir - 1) % @dirs;
}
}
print "Out of bounds after $move moves at ($x, $y)\n";
|
edits