parse-de-berkeley.perl: escape @ characters in input