match(s,ere)
           Return the position, in characters, numbering from  1,
           in  string s where the extended regular expression ere
           occurs, or zero if it does not occur  at  all.  RSTART
           will  be  set  to  the starting position (which is the
           same as the returned  value),  zero  if  no  match  is
           found;  RLENGTH  will  be  set  to  the  length of the
           matched string, -1 if no match is found.

function rindex(str,c)
{
# pass in the string to search (str) and a character to search for (c).
# function will return either a position of 'c' in string 'str' OR '0' if 'c' isn't in
# 'str'. The regex passed to 'match' goes like this:
# "\\" - literal '\' - have to escape it with '\' to preserve the meaning
# followed by char 'c' - resulting in '\c' - need to escape in case 'c' is one
# of the regex chars, e.g. '(', ')', '|' etc
# "[^" - anything BUT the following chars or ranges
# followed by char 'c'
# "]*$" - closing the char list/range - char list repeated 0 or more times (*)
#             anchored to the end of the line ($).
#
# If 'match' found a passed in char, its position will be stored in the
# interval var RSTART - RSTART will be retirned
# If 'match didn't find a passeed in char, 'match' itself will return '0' - 
# therefore a value of '0' will be retuned by the function.
#
# E.g. match("a|b|c|d", "\|[^|]*$")
# Look into the 'match(s,re) description above for more info.
#
return match(str,"\\" c "[^" c "]*$")? RSTART : 0
}