diff -r 000000000000 -r 6474c204b198 tools/page-loader/echo.pl --- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tools/page-loader/echo.pl Wed Dec 31 06:09:35 2014 +0100 @@ -0,0 +1,112 @@ +#!/usr/bin/perl +# +# This Source Code Form is subject to the terms of the Mozilla Public +# License, v. 2.0. If a copy of the MPL was not distributed with this +# file, You can obtain one at http://mozilla.org/MPL/2.0/. +use Time::HiRes qw(gettimeofday tv_interval); + +sub encodeHiResTime { + my $timeref = shift; + return unless ref($timeref); + my $time = $$timeref[0] . "-" . $$timeref[1]; + return $time; +} + +my $time = encodeHiResTime([gettimeofday()]); + +print "Content-type: text/html\n\n"; +print <<"ENDOFHTML"; + + + + + +

+ This page starts the test. +

+ dummy page dummy page dummy page dummy page dummy page dummy page + dummy page dummy page dummy page dummy page dummy page dummy page + dummy page dummy page dummy page dummy page dummy page dummy page + dummy page dummy page dummy page dummy page dummy page dummy page +

+ + + +ENDOFHTML + +exit 0;