croak("$callpack doesn't contain an __DATA__ token")
        unless defined fileno($fh);