perl - 如何在 Perl 中发送 Ctrl-Z

Question

我正在尝试在字符串中发送 Ctrl-Z 命令，这就是我正在做的事情：

$command = "Prueba de código\26";
$port->write($command);
my $answer = $port->read(255);

其中“command”是我想通过“port”（Device::SerialPort）发送的字符串，我试图用“answer”捕获响应，问题是我认为\26（ Ctrl-Z) 不起作用。该端口是连接的手机，目标是通过此手机发送一条短信，上面写着“Prueba de código”。我需要发送这个 Ctrl-Z，因为这被解释为文本的结尾。

Answer 1

该\nnn符号将数字参数视为八进制数字，因此您实际上是在发送chr(22)(Ctrl+V?)

$ perl -e 'print ord("\26")'
22

字符 26 可以用所有这些方式表达（可能还有其他几种方式）

chr(26)
"\032"
"\x1a"
"\cZ"