$result = $dt->{$method}($from, $dummy_field);
            } catch (Exception $e) {
                $result = $e;
            }
            $color = $result === $to || $result instanceof Exception && $to == null ? 'green' : 'red';
            $value = $result instanceof Exception ? $result->getMessage() : var_export($result, true);
            echo "<pre style='text-indent: 3em; color:{$color}'>'{$from}' => {$value} (expected " . var_export($to, true) . ")</pre>\n";
        }
    }
}
echo "<h1>Escape sequences</h1>";
function pre($str)
{
    return "<pre>{$str}</pre>";
}
$message = new CHL7v2Message();
$message->initEscapeSequences();
$escaped = 'START \\F\\ \\S\\ \\T\\ \\E\\ \\R\\ END';
$unescaped = $message->unescape($escaped);
echo pre("escaped: " . $escaped);
echo pre("escaped unescaped: " . $unescaped);
echo pre("escaped unescaped escaped: " . $message->escape($unescaped));
$ascii = 'ASCII escape \\X41\\ ';
echo pre($ascii);
echo pre($message->unescape($ascii));
$unicode = 'Unicode escape \\M2764\\ ';
echo pre($unicode);
echo pre($message->unescape($unicode));
$format = 'test \\H\\I\'m strong\\N\\ test \\.br\\ new line';
echo pre($format);
echo pre($message->format($format));