sub R3{
    sub _{join$",split//,pop}$".&_|&_
}