Hard to tell. What does "lending" mean in this context? The ones before or after the dot(s)?

#!/usr/bin/perl
use warnings;
use strict;
use feature qw{ say };

use Cpanel::JSON::XS;

my $json = '{"dot":"0.0","colon":"0:00"}';
my $structure = Cpanel::JSON::XS->new->decode($json);
for my $type (keys %$structure) {
    say "$type: ", $structure->{$type} =~ s/[.:].*//r;
}
[download]