$ref = new VirtualFS::ISO9660('file.iso') or die "Can't open file.iso: $!";
    
    $ref->opendir($dh, '/') or die "Can't open rootdir in file.iso";
    # NOTE! ONLY THE 3-ARGUMENT FORM OF open IS SUPPORTED!
    $ref->open($fh, '<', '/MANIFEST');
    print "the MANIFEST file contains:\n";
    # this will have to do until perl adds STAT support for tied filehandles
    @stats1 = tied($fh)->STAT;
    @stats2 = $ref->stat('/MANIFEST');
    while (<$fh>) {
        print "$_\n";
    }
    # unlike closedir, $fh is a "real" (tied) filehandle, and you close it
    # normally.
    close $fh;