#!/usr/bin/perl -wT

print "Content-type: text/javascript\n\n";
sleep(1.0);
print "debug('slowAsync');\n";