Select Code to Download

use POSIX qw(strftime);
use Time::Local;
...
$_ = join " ", @range;
s/(.{1,70})(\s|$)/$1\n/g;
print ;

13:00:00 13:05:00 13:10:00 13:15:00 13:20:00 13:25:00 13:30:00
13:35:00 13:40:00 13:45:00 13:50:00 13:55:00 14:00:00 14:05:00
...
21:45:00 21:50:00 21:55:00 22:00:00 22:05:00 22:10:00 22:15:00
22:20:00 22:25:00 22:30:00 22:35:00 22:40:00 22:45:00 22:50:00
22:55:00 23:00:00