Re: Re: Golf (Inspired): Repeated Phrases

by MeowChow (Vicar)

on May 10, 2001 at 20:40 UTC ( #79466=note: print w/replies, xml )

Need Help??

I don't think this works quite right. Compare the output from the following two runs:

@l = repeated('this dog a round', 'this dog a pound', 1, 3);
@l = repeated('this dog a round', 'this dog a pound', 1, 4);
[download]

UPDATE: Here's an 85-byte version that returns all the matches:

sub repeated {
($s,$_,$m,$n)=@_;my@p;for$i($m..$n){$s=~$1&&push@p,$&while/\b(?=((\w+\
+b ?){$i}))/g}@p
}
[download]

   MeowChow                                   
               s aamecha.s a..a\u$&owag.print

Comment on Re: Re: Golf (Inspired): Repeated Phrases Select or Download Code

In Section Meditations

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://79466]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others musing on the Monastery: (5)

As of 2023-12-04 04:03 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?