#!/usr/bin/perl -w

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