Sorting Algorithms/Circle Sort: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) m (→{{header|jq}}: Fix link: Perl 6 --> Raku) |
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: Fix link and comment: Perl 6 --> Raku) |
||
Line 1,017: | Line 1,017: | ||
=={{header|Perl}}== |
=={{header|Perl}}== |
||
Less flexible than the |
Less flexible than the Raku version, as written does only numeric comparisons. |
||
{{trans| |
{{trans|Raku}} |
||
<lang perl>sub circlesort { |
<lang perl>sub circlesort { |
||
our @x; local *x = shift; |
our @x; local *x = shift; |