Email Piping

[G.P.]

Eine kleine Anfängerfrage an euch

Ich habe ein Ticketsystem, welches ankommende Emails per Perl an ein PHP Script weiterleitet.

Weiß jemand, wie ich den Inhalt der weitergeleitet Email mit PHP auslesen und in eine DB speichern kann?


Ich möchte gerne einige Funktionen des Ticketsystems ersetzen, blicke da aber nicht ganz durch

Hier der Perl-Code mit welchen die Mails weitergeleitet werden

Danke für eure Hilfe!

%config = (url => 'URL/api/tickets.php', 
           key => '12345');

#Get piped message from stdin
while (<STDIN>) {
    $rawemail .= $_;
}

use LWP::UserAgent;
$ua = LWP::UserAgent->new;

$ua->agent('osTicket API Client v1.7');
$ua->default_header('X-API-Key' => $config{'key'});
$ua->timeout(10);

use HTTP::Request::Common qw(POST);

my $enc ='text/plain';
my $req = (POST $config{'url'}, Content_Type => $enc, Content => $rawemail);
$response = $ua->request($req);

#
# Process response
# Add exit codes - depending on what your  MTA expects.
# By default postfix exit codes are used - which are standard for MTAs.
#
    
use Switch;

$code = 75;    
switch($response->code) {
    case 201 { $code = 0; }
    case 400 { $code = 66; }
    case [401,403] { $code = 77; }
    case [415,416,417,501] { $code = 65; }
    case 503 { $code = 69 }
    case 500 { $code = 75 }
}
#print "RESPONSE: ". $response->code. ">>>".$code;
exit $code;