Code:
ON *:INPUT:*:{
  var %a | msg $active $null($regsub($1-,/(\S)/g,14[1\114],%a)) %a
}


that works, but it's double:

Php Code:

(17:57) <Duck_Power> [t][e][s][t]
(17:57) <Duck_Power> test