File: timing

package info (click to toggle)
libx86emu 3.5-1.1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,244 kB
  • sloc: ansic: 11,621; perl: 949; makefile: 92; sh: 14
file content (11 lines) | stat: -rwxr-xr-x 166 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
10
11
 
#! /usr/bin/perl

while(<>) {
  if(/^\S+\s+\+(\S+)\s+\S+:\S+\s+/) {
    $t = hex $1;
    $total += $t;
    $count++;
  }
}

printf "%.2f\n", $total/$count if $count;