binmode STDOUT; 
print "Content-type: application/vnd.ms-excel\n";
print "Content-Disposition: attachement; filename=test.xls\n\n";
print $excel;