cat $HOME/housekeeping/requests.txt | sed -e 's/<br>/\\n/g' -e s/\&#39\;/\'/g > $HOME/housekeeping/requests2.txt

##</code><code>##

    open(REQUESTS,"/home/picturesea/housekeeping/requests3.txt") || die "requests3 file not found";
 
    # Open The Mail Program
    open(MAIL,"|$mailprog -t");

    print MAIL "Bcc: $emails\n";
    print MAIL "From: chrisbarton\@postmaster.co.uk (PICTURE SEARCH)\n";
    print MAIL "Subject: PICTURE SEARCH REQUESTS $date\n\n";

    print MAIL "If you think you have suitable images, please CONTACT THE RESEARCHER DIRECT.\n YOU DO NOT NEED TO REPLY TO THIS EMAIL.\n";
 print MAIL "$date\n";
    print MAIL "-" x 75 . "\n";
    while ($requests = <REQUESTS>) {
    	print MAIL "$requests";
	}
    close(REQUESTS);