join "", map s/\z/ cat\nman\n/r, 1..$n

##</code><code>##

join "", map "$_ cat\nman\n", 1..$n