Rebol Programming/suffix?
USAGE:
SUFFIX? path
DESCRIPTION:
Return the suffix (ext) of a filename or url, else NONE.
SUFFIX? is a function value.
ARGUMENTS
- path -- (Type: any-string)
SOURCE CODE
suffix?: func [
{Return the suffix (ext) of a filename or url, else NONE.}
path [any-string!]
][
if all [
path: find/last path #"."
not find path #"/"
] [to-file path]
]