Select Code to Download

sub expand
{
...
    }
    $_
}

sub expand
{
...
    (@a=/^(.*?)\[(\d+):(\d+)\](.*)$/)?map(expand($a[0].$_.$a[3]),$a[1]
+..$a[2]):
    $_
}