# this is what happens when I change
# bless [ $fh, (@_ == 3 ? $sep : ()) ], $class;
# to
# bless [ $real, (@_ == 3 ? $sep : ()) ], $class;

Deep recursion on subroutine "Perl6::FH::AUTOLOAD" at /usr/local/lib/perl5/5.6.0/Tie/Handle.pm line 202.
Deep recursion on subroutine "Tie::StdHandle::EOF" at /export/home/jpinyan/lib/Perl6/FH.pm line 40.
Segmentation fault