#!/usr/bin/perl -w
#use strict;

my $line1=$_;

$LOGFILE="Output.txt";
open(LOGFILE) or die("Could not open Output.txt.");
foreach $line1(<LOGFILE>) {
if ($line1 =~ m/^Start/)
{
$time = $line1;
}
elsif ($line1 =~ m/^Response\s+Time\s+\(avg\):\s+([0-9.]+)/)
{
$response = $line1;
}
{print join $time, $response}
}