パルカワ2

PerlとRubyとイチャラブ

Github に妹を公開した話

最近は Perl を勉強していなくて、続・初めてのPerl 改訂第2版 を読んだこともないです。

題材はなんでも良かったので、さいきん話題の妹を作ってみた。

妹なのに姉になれて便利。

is_imouto

use Acme::Ane qw(ane);
use Acme::Imouto qw(imouto);

if (imouto(ane $girl)->is_imouto) {
    print "妹可愛い"
}

is_kawaii

use Acme::Ane qw(ane);
use Acme::Imouto qw(imouto);

if (imouto(ane $girl)->is_kawaii) {
    print "妹可愛い"
}