Help for this page

Select Code to Download

Select or download this

  DB<127> $str
 => "abcdabcdabceabcdabcdabceab"
...

  DB<129> $rest =~ /^(.+?)\1*$/; $1
 => "abcdabcdabce"