一个 perl 脚本很多 "terminals"（tmux 窗格）

Question

如何使 perl 脚本启动 tmux 子进程，并使脚本将几 (2) 个 tmux 窗格视为（只写）文件描述符？

#!/usr/bin/perl

sub get_handles {
   # some tmux magic    

   return @handles; # return array of two file descriptors, preferably IO::Handle
}

我需要它用于使用 AnyEvent 模块（或线程）的脚本。

Answer 1

https://github.com/tmux/tmux/issues/567 举例说明如何获取伪终端设备列表（文件路径）。

tmux list-panes -F'#{pane_tty} #{pane_id}'

One perl script many "terminals" (tmux panes)