Skicka mail med Perl i ett CGI-script - hos Levonline IT hotell, web hotel

Support

Välkommen till vår supportsektion. Bläddra ner för svaret på din fråga. Har du en teknisk fråga hittar du antagligen svaret på den nedan, eller så kan du prova att söka. Om du saknar något här eller har fått hjälp med något via vår support som du tycker borde finnas här, hör gärna av dig till oss så ordnar vi det!

Utöver supportsidorna har vi tagit fram en rad verktyg för domän och hemsida. Bland verktygen finner du guider för whois, SPF, HTTP-huvuden och mycket mer!

Om du behöver hjälp direkt av vår duktiga support är du välkommen att höra av dig per e-post (support@levonline.com) eller via telefon (08-320 360); vår kundtjänst finns tillgänglig vardagar mellan kl. 08:00 och 18:00 för att hjälpa dig med alla tänkbara problem eller önskemål.

Nedan finner du även ett kontaktformulär för supportfrågor.
Fritext sök
Populärast Webhotell Epost Domän Egen server Bredband
Hemsida PHP ASP Java Databas Unix Allmänt CGI Statistik

Skicka mail med Perl i ett CGI-script

Här är ett exempel på hur man kan använda Perl för att skicka mail. Kom ihåg att det enkelt skall gå att se vilken websajt det är som har skickat brevet. I det här exemplet är CGI-scriptet sparat som skicka.mail.via.perl.cgi. Kom ihåg att ha korrekta rättigheter på scriptet - se avsnittet om CGI-script.

#!/usr/bin/perl

use CGI;
my $query    = new CGI;

print $query->header;


if ($query->param('content') ne "") {
  my $sendmail = "/usr/sbin/sendmail -t";
  open(SENDMAIL, "|$sendmail") or die "Cannot open $sendmail: $!";
  print SENDMAIL "From: automatutskick\@min_domän.com\n";
  print SENDMAIL "To: var-det-nu-skall-skickas\@min_domän.com\n";
  print SENDMAIL "Content-type: text/plain\n";
  print SENDMAIL "Subject: sendmail via perl\n\n";
  print SENDMAIL "här följer content:\n\n";
  print SENDMAIL $query->param('content');
  close(SENDMAIL);
  print 'Nu är ett brev skickat med innehåll ';
  print ''.$query->param('content').'.';
} else {
  print "Inget brev skickat\n";
}

print '
';
print '';
print '';
print '';

Fick du svar på din fråga?

Är du nöjd med svaret på frågan? Ge oss förslag på förbättringar här!




Denna information används för att förbättra artikeln i framtiden.
För snabb hjälp, använd istället kontaktformuläret längre ned.
KONTAKTA OSS!