> AND how can I access the body of the message?
> $ENV{'MBOX'};
> $ENV{'FROM'};
> $ENV{'SUBJECT'}
> working ok but I cant find a variable for the body.. exist?
>
> tank in advance

This may help....
#!C:\perl\bin\perl
$|=1;
read(STDIN, $CONTENT, $ENV{'CONTENT_LENGTH'});
############################################
$CONTENTTO      = $ENV{'TO'};
$CONTENTFROM    = $ENV{'FROM'};
$CONTENTCC      = $ENV{'CC'};
$CONTENTMIME    = $ENV{'MIME'};
$CONTENTREPLYTO = $ENV{'REPLYTO'};
$CONTENTSUBJECT = $ENV{'SUBJECT'};
$CONTENTTO =~ tr/\"/ /;
$CONTENTFROM =~ tr/\"/ /;
$CONTENTCC =~ tr/\"/ /;
$CONTENTMIME =~ tr/\"/ /;
$CONTENTREPLYTO =~ tr/\"/ /;
$CONTENTSUBJECT =~ tr/\"/ /;
############################################
$CONTENT is the full body of the message including header information...
-------------------------------------------------------
To unsubscribe please go to http://www.sambar.ch/list/



Reply via email to