$whour = int($pr/3600); $wmin = int(($pr%3600)/60); $wsec = $pr%60; if($whour>0){ $wmin = "0$wmin" if($wmin<10); $log .="行動中・・・あと$whour時間$wmin分\n"; }elsif($wmin>0){ $wsec = "0$wsec" if($wsec<10); $log .="行動中…あと$wmin分\n"; }else{ $log .="行動中…あと$wsec秒\n";
$log .=qq|行動中…あと$wmin分【この部分】\n|;