出先でこのBlogからコードコピペしたら大変なことになっていたので、ちゃんとコピーできるようにした。 なんか、前はちゃんとコピペ出来てた気がしたけど、大分気のせいだったようです。 今まで、liで1行ずつ色変えて見栄え良かった(私見)のだけど、諦めてテーブルにしましたお とりあえず行き過ぎたゆのでも置いておきますね #!/usr/bin/perl use strict; use warnings; use utf8; use Term::Encoding; binmode STDOUT, ':encoding(' . Term::Encoding::get_encoding . ')'; BEGIN { { package uno_in_perl; use Filter::Simple sub { s#\x58\x20\x2f\x20\x5f\x20\x2f\x20\x58\x20<\x20