#!/usr/bin/perl use strict; sleep 5; print "content-type: text/html\n\n"; print "Done!\n";