print "Content-Type: text/html\n\n"; print qq!

$out_file created.... here

\n!;