ktat https://blog.hatena.ne.jp/ktat/ Practice of Programming https://ktat.hatenadiary.jp/ Perl ちょっと遊んでいたら見つけたのですが、これ簡単ですね。 use IO::Pty::Easy; my $pty = IO::Pty::Easy->new; $pty->spawn("mysql -u root"); while ($pty->is_active) { while (my $o = $pty->read(1)) { print $o; } if (my $sql = <>) { $pty->write($sql); } else { $pty->write("exit\n"); last; } } こんな感じにするだけで、perl から mysql の shell が叩けるよ。 い… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fktat.hatenadiary.jp%2Fentry%2F20120131%2F1327946485" title=" IO::Pty::Easy が簡単・便利 - Practice of Programming" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> Hatena Blog https://hatena.blog 2012-01-31 03:01:25 rich https://ktat.hatenadiary.jp/entry/20120131/1327946485 1.0 100%