Shibuya.js とかでは、JavaScript とかでプレゼンツールを自作しているのに、Perl でプレゼンツールを自作している奴は、見たことがない。 YAPC::ASIA 2007 の LT 向けに、ターミナルを使った高橋メソッドなプレゼンをやろうと思って、Perl で適当に書いてみた。 →、↓、[PgDn] でページを進む。 ←、↑、[PgUp] でページを戻る。 [Home] で先頭ページへ。 [End]、C-c、C-d でプレゼン終了。 でも、ターミナルだと表現力が足りなさすぎてなんか面白くないからやめた。 そもそも Term::* 系ってほとんど使ったことがないから、よくわからないまんま作ってみて、微妙すぎて、これ以上手を加える気が失せた。 まずいないでしょうが、もし誰か使いたいっていう奇特な方がいたら、どうぞご勝手に。 #!/usr/local/bin/perl # $I
![Perl でプレゼンテーションツール - にぽたん研修所 兼 にぽたん休憩所](https://cdn-ak-scissors.b.st-hatena.com/image/square/6821d11d8914a1a6c502748113250caf843584c0/height=288;version=1;width=512/https%3A%2F%2Fcdn-ak.f.st-hatena.com%2Fimages%2Ffotolife%2Fn%2Fnipotan%2F20070330%2F20070330110411.gif)