08/08/25 21:17:50
>>327
そだね
あと、ミス
× $str=~ s/Ⅰ-Ⅹ/ord($1)-ord('Ⅰ') + 1/eg;
○$ str=~ s/[Ⅰ-Ⅹ]/ord($1)-ord('Ⅰ') + 1/eg;
08/08/25 21:17:50
>>327
そだね
あと、ミス
× $str=~ s/Ⅰ-Ⅹ/ord($1)-ord('Ⅰ') + 1/eg;
○$ str=~ s/[Ⅰ-Ⅹ]/ord($1)-ord('Ⅰ') + 1/eg;
08/08/25 21:17:50
>>327
そだね
あと、ミス
× $str=~ s/Ⅰ-Ⅹ/ord($1)-ord('Ⅰ') + 1/eg;
○$ str=~ s/[Ⅰ-Ⅹ]/ord($1)-ord('Ⅰ') + 1/eg;