Select Code to Download

open (MAIL, "|$mailProg") || die "Can't create pipe to $mailProg: $!";

open my $mailer, "|-", $mail_prog or die "couldn't open pipe to $mail_
+prog: $!";