Match repeating pattern

[Serman D.]

$ perl -wle 'print 1/7'
0.142857142857143

How do I match the a repeating pattern within a string? Of the above
string I want to match '142857'.

Thanks.

Serman D.
--

 

[usenet]

How do I match the a repeating pattern within a string? Of the above
string I want to match '142857'.

Please clarify: What if the string is 0.2323232323232323

Would you want to match 23? or 2323? or 232323? Or 232232323?

All of these patterns are repeated in the string.

If the string is: 0.111A111B111

Would you expect to match 111? (ie, matches not sequential)

 

[Serman D.]

Please clarify: What if the string is 0.2323232323232323

I want to match the longest, sequential repeating pattern within the
string.

 

[Tad McClellan]

$ perl -wle 'print 1/7'
0.142857142857143

How do I match the a repeating pattern within a string? Of the above
string I want to match '142857'.

perl -le 'print $1 if (1/7) =~ /\.(\d+)\1+/'

 

[Tad McClellan]

I want to match the longest, sequential repeating pattern within the
string.

What if the string is 12341234.567567 ?

perl -le 'print $1 if "12341234.567567" =~ /(\d+)\1+/'