$s =~ s{ \d+ \s+ (?: [01] \s+){17} \K }{$bar}xmsg;