Human Resources : Application for Employment

sub send_email { open (MAIL, "|$mailprog -t") || die "Can't open $mailprog!\n"; print MAIL "Content-type:text/html\n"; print MAIL "From: $from_email\n"; print MAIL "To: $to_email\n"; print MAIL "Subject: $attention Employment Application : $fields{'name'}\n\n"; print MAIL < Human Resources : Application for Employment

Name: $name

to_the_end close (MAIL); }