alias F12 retest
alias retest {
  set %retest.regex $input(Regular Expression,e,RegExp Test,%retest.regex)
  set %retest.data $input(Raw Data,e,RegExp Test,%retest.data)
  echo -tmga --- RegExp Test ---
  echo -tmga RegExp: %retest.regex
  echo -tmga Data: %retest.data
  if ($regex(%retest.data,%retest.regex)) {
    echo -tmga Match!
    var %g 1
    while ($regml(%g)) {
      echo -tmga Group ( $+ %g $+ ): $ifmatch
      inc %g
    }
    if (%g == 1) echo -tmga 4! no groups found
  }
  else echo -tmga 4! no matches found
  echo -tmga --- * ---
}