Weblabor

if ($mbox = imap_open($host.$data->eiaMailbox, $data->eisUsername, $data->eisPassword)) :
  $mails = imap_search($mbox, 'UNSEEN');
  if (!empty($mails)) :
    foreach ($mails AS $mail) :
$overview	= imap_fetch_overview($mbox, $mail)[0];

$header		= preg_replace('~(*BSR_ANYCRLF)\R~', "\r\n", preg_replace_callback('/^([a-z\d_-]+.?)/mi', function ($m)
{
	switch (rtrim(strtolower($m[0]), ':')) :
		case 'to':					return 'X-Original-To:';		break;
		case 'subject':				return 'X-Original-Subject:';	break;
		case 'received':			return 'X-O-Received:';			break;
		case 'return-path':			return 'X-O-Return-Path:';		break;
		case 'delivered-to':		return 'X-O-Delivered-To:';		break;
		case 'message-id':			return 'X-O-Message-Id:';		break;
		case 'dkim-signature':		return 'X-O-DKIM-Signature:';	break;
		case 'x-mailer':			return 'X-O-Mailer:';			break;
	endswitch;

	return $m[0];
}, imap_fetchheader($mbox, $mail)));

$extra_header = [
	'X-Mailer'		=> 'PHP-Resender',
	'X-Resent'		=> 'Yes',
	'Resent-From'	=> '<'.$overview->to.'>',
	'Resent-Date'	=> date('D, d M Y H:i:s O (T)'),
	'Return-Path'	=> '<'.$overview->to.'>'
];

if (imap_mail($data->euName.'##kukac##'.$data->wsDomain, $overview->subject, imap_body($mbox, $mail), preg_replace('/(^[\r\n]*|[\r\n]+)[\s\t]*[\r\n]+/', "\r\n", $header."\n".implode("\n", array_map(function($v, $k)
{
	return $k.': '.$v;
}, $extra_header, array_keys($extra_header))))))
	echo "OK\n";
else
	echo "ERROR\n";

imap_setflag_full($mbox, $mail, "\\Seen");
    endforeach;
  endif;
endif;