il codice effetua il salvataggio del file sul mio computer mentre io vorrei che salvasse un pagina html sul mio server non so come fare aiutatemi
sub sendOutput {

if ($FORM{'submit'} =~ /download/i) {

print "Content-type: download\n";

print "Content-Disposition: attachment; filename=page.html\n";

print "Content-Description: $FORM{'title'}\n\n";

} elsif($FORM{'submit'} =~ /source/i) {

print "Content-type: text/plain\n\n";

} else {

print "Content-type: text/html\n\n";

}