誕生日を引数に、何歳代の前半か、後半かを出力するTTフィルター作ってんけど、 これも、コードがきに食わない。もっと、スマートにできないか。誰か教えて！ sub fs_fazzy_birthday { my $date = shift; # $date must be yyyy-mm--dd format. $date =~ m/(\…