Something

alias skillsnumba {
  if ($1 == 0) || ($regex($1,/^(st|(skill)?total|overall)$/Si)) return 0
  elseif ($1 == 1) || ($regex($1,/^at(t|k|tack)$/Si)) return 1
  elseif ($1 == 2) || ($regex($1,/^def(en[cs]e)?$$/Si)) return 2
  elseif ($1 == 3) || ($regex($1,/^str(ength)?$/Si)) return 3
  elseif ($1 == 4) || ($regex($1,/^hp|hit(s|points?)?$/Si)) return 4
  elseif ($1 == 5) || ($regex($1,/^r(ng|ange|anged|angeing|anger)?$/Si)) return 5
  elseif ($1 == 6) || ($regex($1,/^Pray(er)?$$/Si)) return 6
  elseif ($1 == 7) || ($regex($1,/^mag(e|ic)$$/Si)) return 7
  elseif ($1 == 8) || ($regex($1,/^cook(ing)?$/Si)) return 8
  elseif ($1 == 9) || ($regex($1,/^wc|wood(cut(ting)?)?$/Si)) return 9
  elseif ($1 == 10) || ($regex($1,/^fletch(ing)?$/Si)) return 10
  elseif ($1 == 11) || ($regex($1,/^fish(ing)?$/Si)) return 11
  elseif ($1 == 12) || ($regex($1,/^(fire|fm)(make?(ing)?|ing)?$/Si)) return 12
  elseif ($1 == 13) || ($regex($1,/^craft(ing)?$/Si)) return 13
  elseif ($1 == 14) || ($regex($1,/^(smith|smelt)(ing)?$/Si)) return 14
  elseif ($1 == 15) || ($regex($1,/^mine(ing)?$/Si)) return 15
  elseif ($1 == 16) || ($regex($1,/^herb(law|lore)?$/Si)) return 16
  elseif ($1 == 17) || ($regex($1,/^agil(ity)?$/Si)) return 17
  elseif ($1 == 18) || ($regex($1,/^(th(ei|ie)[fv](e|ing)?)$/Si)) return 18
  elseif ($1 == 19) || ($regex($1,/^slay(er|ing)?$/Si)) return 19
  elseif ($1 == 20) || ($regex($1,/^farm(er|ing)?$/Si)) return 20
  elseif ($1 == 21) || ($regex($1,/^(rc|runecraft)(er|ing)?$/Si)) return 21
  elseif ($1 == 22) || ($regex($1,/^(con)(struct)?(ion|ing)?$/Si)) return 23
  elseif ($1 == 23) || ($regex($1,/^(hunt)(er|ing)?$/Si)) return 22
}