持続時間(hh:mm:ss)を総秒に変換する方法はPerlにありますか?
サンプル:02:50:30出力:10230
ベストアンサー1
次のプログラムがこれを行う必要があります。
$hhmmss="02:50:30";
@arr=split(':',$hhmmss);
$sec=@arr[2];
$sec+=@arr[1]*60;
$sec+=@arr[0]*3600;
print $sec;
持続時間(hh:mm:ss)を総秒に変換する方法はPerlにありますか?
サンプル:02:50:30出力:10230
次のプログラムがこれを行う必要があります。
$hhmmss="02:50:30";
@arr=split(':',$hhmmss);
$sec=@arr[2];
$sec+=@arr[1]*60;
$sec+=@arr[0]*3600;
print $sec;