sub roundThatBadDog { my $seconds = shift; return int ($seconds + .5); }