use strict; use CGI qw(:all); print header(-type=>"application/excel\nContent-disposition: attachment; filename=myfile.xls") ; print "
1 2 3
1 2 3
1 2 3
1 2 =a1*b1*c1
1 2 3
"; print end_html; ####