if (condition){
print "DEBUG ($.) Call Length det='$detail' ($dh:$dm:$ds)\n" if $DEBUG; 
} 
else {
# TODO : Might want to issue an alert and solder on! safedie 
print "FATAL ($.) Encountered line of unknown length (",$#line + 1,")";
}