Select Code to Download

use strict;
use warnings;
...
my $format = "        %-4s           %-18s             %-7s        %-3
+s\n";

printf $format, $Status, $element, $ms, $count;

        frst           tyr                            0ms        
+    1.24ms