chomp($_=<>);$a=$_;s/([^a-f+-]|e)//ig;s/f//ig;s/a/spit(2);/ig;
s/b/print;/ig;s/c/eof;/ig;s/d/}d/ig;s/.\-//ig;$b=$_;$_=$a;
s/[^abcdf]//ig;$_=length;$b=length$b;$_=$b/(2*$_);print;