format STDOUT_TOP =
@<<<<<<<<< @<<<<<<<<< @<<<<<<<<< @<<<<<<<<<
$time[0],  $time[1],  $time[2],  $time[3],
.
format STDOUT =
@<<<<<<<<< @###   @###   @###   @###
$type,     $val1, $val2, $val3, $val4
.
$~ = "STDOUT_TOP";
write;