>>55
utf8フラグ付きの文字列を返させるためにAcme::Oppaiのオプションにuse_utf8を付ける。
後はワイドキャラクタ文字列として処理。

use 5.12.0;
use warnings;
use Acme::Oppai;
use open qw(:encoding(cp932) :std);

my $oppai = Acme::Oppai->new('use_utf8' => 1);
say $oppai->oppai;