in reply to Re^9: Algorithm RFC: fast (pseudo-)random shuffle with no repetition
in thread Algorithm RFC: fast (pseudo-)random shuffle with no repetition

> 
    if ( $s =~ /($m2)/ ) {
        goto PERMUTE;
        say $1;
        sleep 1;
    }

[download]

Looks like dead code after the goto

Cheers Rolf
(addicted to the Perl Programming Language :)
see Wikisyntax for the Monastery

  • Comment on Re^10: Algorithm RFC: fast (pseudo-)random shuffle with no repetition
  • Download Code

Replies are listed 'Best First'.
Re^11: Algorithm RFC: fast (pseudo-)random shuffle with no repetition
by karlgoethebier (Abbot) on Sep 25, 2023 at 19:47 UTC

    Yes.

    «The Crux of the Biscuit is the Apostrophe»

[reply]

In Section Seekers of Perl Wisdom