sub re {$a=()=pop=~/Re:\s*/g;"Re^$a: $'"}