When I do

use Time::List;
use Time::List::Constant;

my $obj = Time::List->new(
input_strftime_form => '%Y-%m-%d %H:%M:%S',
output_strftime_form => '%d.%m.%Y %H:%M:%S',
time_unit => HOUR,
output_type => ARRAY,
);

my $start = '2013-12-31 23:05:13';
my $stop = '2014-01-01 03:04:33';

print join "\n", @{ $obj->get_list( $start, $stop ) };

I would expect to get

01.01.2014 00:05:13
01.01.2014 01:05:13
01.01.2014 02:05:13

instead of

01.01.2014 00:00:00
01.01.2014 01:00:00
01.01.2014 02:00:00