ruby -e 'p gets.split.index("bar").succ' myfile
newlisp -e '(+ 1(find "foo" (parse (read-line))))' <myfile