作者：Ryan Connelly

示例

> say replicate(<a b c c d e>.list, 3);
a a a b b b c c c c c c d d d e e e

源代码：P15-topo.pl

use v6;

sub replicate(@list, $times)
{
    @list.map({$_ xx $times}).flat;
}

say "{replicate(<a b c c d e>.list, 3)}";