use Perl::Golf;

sub re{
$_=pop;s/Re:\s*/\x01/g;s/Re(\d+):\s*/"\x01"x$1/eg;s/(\x01+)/"Re".
length($1).": "/e;$_;
}