#!/usr/bin/perl

$inst=shift @ARGV;

while(<>)
{
	if (/^$inst.+wallclock.+\s=\s*(\d+.\d+)\sCPU/)
	{
		print "$1\n";
	}
}


 
