Java 给出错误'；错误错误文件描述符'；在Perl的执行过程中

[根据评论员的评论更新问题]当我使用以下命令执行prop.obj时 “perl sendXssl.pl主机名端口prop.obj”，它给出的错误为“错误文件描述符错误，ssl_error=ssl连接尝试在sendXssl.pl第6行失败”。 请帮我解决这个问题。 下面给出了我的Perl程序

Perl

---

您将直接和间接方法语法混合在一起：

$sock = new IO::Socket::SSL->new(
#       ~~~                  ~~~
  PeerHost => $ARGV[0],
  PeerPort => $ARGV[1],
  SSL_verify_mode => SSL_VERIFY_NONE)

---

删除第一个

新的
，然后再试一次。
请回答您的问题，并对您的程序的功能进行解释。然后，让Perl程序包含
使用严格的
和
使用警告
，并确保它能够编译。另外，请包含完整的错误消息。不要切断任何东西，如行号。这对于了解错误在哪里很重要。在其当前形式中，我们无法回答您的问题，因为我们不知道您正在尝试执行的操作。1）您有两个
die“Error$！\n”
可以生成该消息，但您没有指定是哪一个生成该错误。2） 
new IO:：Socket:：SSL->new（…）
应该是
IO:：Socket:：SSL->new（…）
3）
IO:：Socket:：SSL->new
设置
$@
错误。4） 始终使用
严格使用；使用警告qw（全部）为什么使用
“+Hi@ikegami模式1）此错误来自第一个骰子。2）我更新了相同的错误，但仍然存在第一个骰子的相同错误。4）我使用了
使用严格；使用警告qw（全部）；
并使用
my
关键字声明所有变量。Plz helpOops，我对
$！
/
$@
的看法是错误的。我以为您在使用IO:：Socket:：INET.IO:：Socket:：SSL说要使用
或死亡“error=$！，ssl_error=$IO:：Socket:：ssl:：ssl_error”；
它再次给出相同的错误“错误错误文件描述符”“我是PERL新手，当我从命令行执行PERL时，遇到了这个错误。屏幕截图现在附在问题后面。您告诉Perl抛出错误。在你告诉它去死的两个地方使用不同的错误信息，你至少会知道它发生在哪里。@PawanDwivedee如果你读了死的地方，你会看到如何得到错误信息中包含的文件名和行号。谢谢，@Shawn and choroba，我也做了同样的事情，发现错误来自第一次死亡。
import java.io.FileOutputStream;
    import java.io.ObjectOutputStream;
    import java.util.Properties;
    
    public class PropertiesX {
    
        public static void main(String[] args) {
            try {
                String[] s = new String[1];
                s[0] = "notepad.exe";
                Properties p = new Properties();
                p.put("commandArgs",s);
                p.setProperty("parent", "c:\\windows\\system32\\notepad.exe");
                FileOutputStream fos = new FileOutputStream("prop.obj");
                ObjectOutputStream oos = new ObjectOutputStream(fos);
                oos.writeObject(p);
                oos.close();
                System.out.println(p.toString());
            } catch (Exception ex) {
                ex.printStackTrace();
            }
        }
    }

$sock = new IO::Socket::SSL->new(
#       ~~~                  ~~~
  PeerHost => $ARGV[0],
  PeerPort => $ARGV[1],
  SSL_verify_mode => SSL_VERIFY_NONE)