Perlコーディング初心者質問スレ Part 57at PHPPerlコーディング初心者質問スレ Part 57 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト112:nobodyさん 08/03/14 00:26:38 !($aaa % 8) ← これで８の倍数のチェックだけど、マイナス値は試してないのでわかんないｗ ８で割ってみて余りが０なら割り切れてるので８の倍数ということ 113:nobodyさん 08/03/14 00:34:03 $aaa=1; if($aaa==1||$aaa==3) if ($aaa =~ /^[13]$/) こんなのできないこともないけど、そのままでいいんじゃないか？ 114:111 08/03/14 00:40:08 jE/64EXv >112 そういうやりかたもあるんですね。 >113 極端にいえば if($aaa==1||$aaa==5||$aaa==13||$aaa==17||$aaa==25||$aaa==34||) こんなに長くなってしまう。 これじゃあまりにもじゃないですか？ 115:nobodyさん 08/03/14 01:07:31 $aaa==9 や $aaa==21 が入ってなくて $aaa==34 が出てくるから 長くなるんだと思う。 116:nobodyさん 08/03/14 01:13:26 ありえる数字を列挙させて、それのチェック対象が１つの変数なら １つの変数に対して配列で一気にチェックできた気がする grep 使ったような使わなかったような・・・ごめん。 俺にはもう無理ｗ 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch