http://awwx.ws/begins-rest0.arc:
(def begins-rest (pattern s) (if (begins s pattern) (cut s (len pattern))))
arc> (begins-rest "abc" "abcdef") "def"
arc> (begins-rest "abc" "abc") ""
arc> (begins-rest "abc" "defghi") nil
This hack depends on arc3.1.
Same as Arc.