print "DEBUG ($.) Call Length det='$detail' ($dh:$dm:$ds)\n" if $DEBUG;