Cacher is the code snippet organizer for pro developers

IF test PAT-MATCH s IMAGE-REF image @image
                  pat "(\\.jpg|\\.png|\\.gif)"
   then "\" title=\""
   else ".jpg\" title=\""