$ perl -w bf.pl <(perl bf.pl < bf.pl)
  Complex regular subexpression recursion limit (32766) exceeded at bf.pl line 5, <> chunk 1.
  ...