Perlで､以下に記述するようなﾛｼﾞｯｸを書きたいのですが､自分で書くとｺﾞﾁｬｺﾞﾁｬしてしまいます｡ｼﾝﾌﾟﾙな書き方はあるでしょうか｡| ▽1
●
b-wind ●100ﾎﾟｲﾝﾄ  ﾍﾞｽﾄｱﾝｻｰ |
$num= "56"; $num =~ s/([0-5])([0-9])/((($1+($2>=6?1:0)))%6).($2>=1&&$2<=5?5:0)/e; print "$num";
こんなとこかな｡
ありがとうございます！
想定してたよりｼﾝﾌﾟﾙでした｡
なんとか中身も理解できたので､そのまま使わせていただきます｡
またよろしくお願いします｡
