#!/usr/bin/perl -wT print "Content-type: text/javascript\n\n"; sleep(1.0); print "debug('slowAsync');\n";