プログラム、5分から初めて10分毎にマッチさせるには？

プログラム、5、15，25・・・55分枚にマッチさせたいです。
とりあえず思いつくところではこんな感じですがあまりいいとは思えません。
もっと良い方法はありますでしょうか？

--perl---
for(;;){
my ( $sec, $min, $hour, $mday, $mon, $year, $wno ) = localtime(time);
if ( $min == 5 || $min == 15 || $min == 25 || $min == 35 || $min == 45 || $min == 55) {
print "hit>$min\n";
sleep 60;
}
sleep 1;
}

No.1 回答者： ybnormal 回答日時： 2019/12/07 17:30

$min%10==5　とするともう少しすっきりするかもしれません。

この回答へのお礼

ありがとうございます。余りが常に5になる法則が隠れていましたか。気づきませんでした！

お礼日時：2019/12/08 12:21