[O] problem with code blocks

[LanX]

Hi

hier a ECM which fails

-----------------------
#+LaTeX_CLASS: beamer
#+startup: beamer

* title

#+BEGIN_Example: perl
 grep { $_ ->[0] } 
  X{1,2,3} X{1,2,3} X{1,2,3};
#+END_Example:
---------------------------

originally I tried Begin_src but I wanted to be sure that it has not to do with highlighting.

I get the message "if: Wrong type argument: stringp, nil"

But deleting the [0] solves the problem

-----------------------------
#+BEGIN_Example: perl
 grep { $_ -> } 
  X{1,2,3} X{1,2,3} X{1,2,3};
#+END_Example:
---------------------------

Does org try to find footnotes in code blocks?

Any help appreciated!!!

Cheers
 Rolf