16:37:03です。16:37:03です。16:37:03です。16:00:00です。00:00:00です。12:34:56です。03:34:56です。解説まあ、ソースを見たまんまです(笑)。Perlのクラスでは珍しい動作をしますので、時刻の計算を行うメソッドに注目してください。計算結果のオブジェクトを返しますが、これは元のオブジェクトが持つ時刻を変更して、元のオブジェクトを返しています。変更後のオブジェクトは生成されません。別のオブジェクトとして受け取る際は、まずcloneを呼び出して同じ時刻の別オブジェクトを生成してから変更しています。mojolicious。