Select Code to Download

if ($ENV{'REQUEST_METHOD'} eq 'POST') {

...

    $FORM{$name} = $value;
    }

 open (MESSAGE,"| /usr/lib/sendmail -t");

...
    .
    .
    close (MESSAGE);