Averages/Mean time of day: Difference between revisions
Content added Content deleted
Line 1,190: | Line 1,190: | ||
say seconds_2_hms int( $sum / $count );</lang> |
say seconds_2_hms int( $sum / $count );</lang> |
||
{{runtime}} |
|||
<pre> |
|||
<lang Perl> |
|||
$ echo 23:00:17, 23:40:20, 00:12:45, 00:17:19 | mean_time.pl |
$ echo 23:00:17, 23:40:20, 00:12:45, 00:17:19 | mean_time.pl |
||
23:47:40 |
23:47:40 |
||
</ |
</pre> |
||
=={{header|Perl 6}}== |
=={{header|Perl 6}}== |