#!/usr/bin/perl
use strict;
print "Content-Type: text/javascript; charset=us-ascii\n\n";
sleep 10;
print "alert ('10s');\n";