Rep-string: Difference between revisions
Content deleted Content added
Walterpachl (talk | contribs) REXX updated |
→{{header|Perl 6}}: update to latest task |
||
| Line 129: | Line 129: | ||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |
||
| ⚫ | |||
{{update|Perl 6}} |
|||
| ⚫ | |||
.say; |
.say; |
||
if /^ (.+) $0+ (.*$) <?{ $0.substr(0,$1.chars) eq $1 }> / { |
if /^ (.+) $0+ (.*$) <?{ $0.substr(0,$1.chars) eq $1 }> / { |
||
| Line 162: | Line 161: | ||
101 |
101 |
||
(no repeat) |
|||
11 |
|||
1 |
|||
10 |
|||
(no repeat) |
(no repeat) |
||