perl - hh:mm:ssを秒に変換する方法

perl - hh:mm:ssを秒に変換する方法

持続時間(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;

おすすめ記事