on *:input:*: {
  if ($left($1,1) != $chr(47)) {
    say $remove($1,$left($1,1),$upper($left($1,1)))
    halt
  }
}