Skip to main content
Commonmark migration
Source Link

##Perl 5, 29 bytes

Perl 5, 29 bytes

$n=<>;{2**++$_%$n-1?redo:say} 

Hat tip.

##Perl 5, 29 bytes

$n=<>;{2**++$_%$n-1?redo:say} 

Hat tip.

Perl 5, 29 bytes

$n=<>;{2**++$_%$n-1?redo:say} 

Hat tip.

deleted 1 character in body
Source Link
msh210
  • 3.5k
  • 23
  • 36

##Perl 5, 3029 bytes

$n=<>;{2**++$_%$n==12**++$_%$n-1?say:redo:say} 

Hat tip.

##Perl 5, 30 bytes

$n=<>;{2**++$_%$n==1?say:redo} 

Hat tip.

##Perl 5, 29 bytes

$n=<>;{2**++$_%$n-1?redo:say} 

Hat tip.

Source Link
msh210
  • 3.5k
  • 23
  • 36

##Perl 5, 30 bytes

$n=<>;{2**++$_%$n==1?say:redo} 

Hat tip.