如何在Perl中发送Ctrl-Z

Question

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

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

“command”是我想通过“port”（Device :: SerialPort）发送的字符串，我试图用“回答”捕获响应，问题是我认为\ 26（Ctrl-Z）无效。该端口是连接的手机，目的是通过这款手机发送短信“Pruebadecódigo”。我需要这个Ctrl-Z来发送，因为这被解释为文本的结尾。

Answer 1

\nnn表示法将数字参数视为八进制数字，因此您实际上是在发送chr(22)（Ctrl + V？）

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

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

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