# File lib/edi4r.rb, line 484
    def Interchange.peek( hnd=$stdin)
      case rc=Interchange.detect( hnd )
        # Does not exist yet!
#      when 'BZ': Interchange.peek( Zlib::Bzip2Reader.new( hnd ) )
        # Temporary substitute, Unix/Linux only, low performance:
      when 'BZ': Interchange.peek( EDI::Bzip2Reader.new( hnd ) )

      when 'GZ': Interchange.peek( Zlib::GzipReader.new( hnd ) )
      when 'E':  EDI::E::Interchange.peek( hnd )
      when 'I':  EDI::I::Interchange.peek( hnd )
      when 'XE': EDI::E::Interchange.peek_xml( REXML::Document.new(hnd) )
      when 'XI': EDI::I::Interchange.peek_xml( REXML::Document.new(hnd) )
      else raise "#{rc}: Unsupported format key - don\'t know how to proceed!"
      end
    end