douche

  if ($regex($1,/^[!@]cm-feet/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 / 30.48),2) $+ '
  }
  if ($regex($1,/^[!@]cm-inch(es)?/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 / 2.54),2) inches
  }
  if ($regex($1,/^[!@]inch(es)?-cm/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 * 2.54),2) cm
  }
  if ($regex($1,/^[!@]inch(es)?-feet/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 / 12),2) $+ '
  }
  if ($regex($1,/^[!@]feet-inch(es)?/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 * 12),2) inches
  }
  if ($regex($1,/^[!@]feet-cm/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $round($calc($2 * 30.48),2) cm
  }
  if ($regex($1,/^[!@]f-c/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $calc(($2 - 32) * 5/9) $+ ° C
  }
  if ($regex($1,/^[!@]c-f/Si)) {
    if ($3) halt
    elseif ($2) $iif($left($1,1) == @,msg $chan,notice $nick) $calc(($2 * 1.8) + 32) $+ ° F
  }