$!="asaasaasss";$!~="as"~"aa"x$_~"sss"for "12142211112123212321421124163131214132122123221414".comb;say $!,"asaa"