my $query = shift;
	my $filename = $query->param('filename');
	my $conid = $query->param('conid');
    $filename=$conid.'_'.$filename;

    print $query->header(-type=>"application/vnd.ms-excel");
    open(NEWFILE,"</tmp/$filename");
    print <NEWFILE>;	
    close(NEWFILE);