#!/usr/bin/perl
use strict;
use warnings;
my $data = '[2017-05-02 13:02:25,986] [AJPRequestHandler-HTTPThreadGroup-10239] SID0003457|10.22.165.22|13|16|FAILED|500||<?xml version="1.0" encoding="UTF-8"?> <S:Envelope xmlns:S="http://s...content-available-to-author-only...p.org/soap/envelope/"><S:Header><ns1:SessionType xmlns:ns1="http://t...content-available-to-author-only...e.com/webservices">STATELESS</ns1:SessionType><ns2:UsernameToken xmlns:ns2="http://t...content-available-to-author-only...e.com/webservices">ocore-intg_w
w@example.com</ns2:UsernameToken><ns3:PasswordText xmlns:ns3="http://t...content-available-to-author-only...e.com/webservices">UdontsoiuN</ns3:PasswordText></S:Header><S:Body><getExternalPortalUserElement xmlns="http://content-available-to-author-only.web.
tough1.tough.example.com/"><emailAddress>park.phannon23@example.com</emailAddress></getExternalPortalUserElement></S:Body></S:Envelope>|{http://w...content-available-to-author-only...e.com/}getExternalPortalUserElement|<n
s1:Header xmlns:ns1="http://s...content-available-to-author-only...p.org/soap/envelope/"><ns1:SessionType xmlns:ns1="http://t...content-available-to-author-only...e.com/webservices">STATELESS</ns1:SessionType><ns2:UsernameToken xmlns:ns2="http://t...content-available-to-author-only...e.com/webservices">ocore-intg_ww@example.com</ns2:UsernameToken><ns3:PasswordText xmlns:ns3="http://t...content-available-to-author-only...e.com/webservices">UiojdfdoiNN</ns3:PasswordText></ns1:Header>|0|620|null';
if ( $data =~ m!^\
[(\d{4}-\d{2}-\d{2})\
s+(\d{2}:\d{2}:\d{2}).*<emailAddress>(.*)<\
/emailAddress
>!gs
){ }
IyEvdXNyL2Jpbi9wZXJsCnVzZSBzdHJpY3Q7CnVzZSB3YXJuaW5nczsKCm15ICRkYXRhID0gJ1syMDE3LTA1LTAyIDEzOjAyOjI1LDk4Nl0gW0FKUFJlcXVlc3RIYW5kbGVyLUhUVFBUaHJlYWRHcm91cC0xMDIzOV0gU0lEMDAwMzQ1N3wxMC4yMi4xNjUuMjJ8MTN8MTZ8RkFJTEVEfDUwMHx8PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0iVVRGLTgiPz4gPFM6RW52ZWxvcGUgeG1sbnM6Uz0iaHR0cDovL3MuLi5jb250ZW50LWF2YWlsYWJsZS10by1hdXRob3Itb25seS4uLnAub3JnL3NvYXAvZW52ZWxvcGUvIj48UzpIZWFkZXI+PG5zMTpTZXNzaW9uVHlwZSB4bWxuczpuczE9Imh0dHA6Ly90Li4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5lLmNvbS93ZWJzZXJ2aWNlcyI+U1RBVEVMRVNTPC9uczE6U2Vzc2lvblR5cGU+PG5zMjpVc2VybmFtZVRva2VuIHhtbG5zOm5zMj0iaHR0cDovL3QuLi5jb250ZW50LWF2YWlsYWJsZS10by1hdXRob3Itb25seS4uLmUuY29tL3dlYnNlcnZpY2VzIj5vY29yZS1pbnRnX3cKd0BleGFtcGxlLmNvbTwvbnMyOlVzZXJuYW1lVG9rZW4+PG5zMzpQYXNzd29yZFRleHQgeG1sbnM6bnMzPSJodHRwOi8vdC4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4uZS5jb20vd2Vic2VydmljZXMiPlVkb250c29pdU48L25zMzpQYXNzd29yZFRleHQ+PC9TOkhlYWRlcj48UzpCb2R5PjxnZXRFeHRlcm5hbFBvcnRhbFVzZXJFbGVtZW50IHhtbG5zPSJodHRwOi8vY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkud2ViLgp0b3VnaDEudG91Z2guZXhhbXBsZS5jb20vIj48ZW1haWxBZGRyZXNzPnBhcmsucGhhbm5vbjIzQGV4YW1wbGUuY29tPC9lbWFpbEFkZHJlc3M+PC9nZXRFeHRlcm5hbFBvcnRhbFVzZXJFbGVtZW50PjwvUzpCb2R5PjwvUzpFbnZlbG9wZT58e2h0dHA6Ly93Li4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5lLmNvbS99Z2V0RXh0ZXJuYWxQb3J0YWxVc2VyRWxlbWVudHw8bgpzMTpIZWFkZXIgeG1sbnM6bnMxPSJodHRwOi8vcy4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4ucC5vcmcvc29hcC9lbnZlbG9wZS8iPjxuczE6U2Vzc2lvblR5cGUgeG1sbnM6bnMxPSJodHRwOi8vdC4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4uZS5jb20vd2Vic2VydmljZXMiPlNUQVRFTEVTUzwvbnMxOlNlc3Npb25UeXBlPjxuczI6VXNlcm5hbWVUb2tlbiB4bWxuczpuczI9Imh0dHA6Ly90Li4uY29udGVudC1hdmFpbGFibGUtdG8tYXV0aG9yLW9ubHkuLi5lLmNvbS93ZWJzZXJ2aWNlcyI+b2NvcmUtaW50Z193d0BleGFtcGxlLmNvbTwvbnMyOlVzZXJuYW1lVG9rZW4+PG5zMzpQYXNzd29yZFRleHQgeG1sbnM6bnMzPSJodHRwOi8vdC4uLmNvbnRlbnQtYXZhaWxhYmxlLXRvLWF1dGhvci1vbmx5Li4uZS5jb20vd2Vic2VydmljZXMiPlVpb2pkZmRvaU5OPC9uczM6UGFzc3dvcmRUZXh0PjwvbnMxOkhlYWRlcj58MHw2MjB8bnVsbCc7CgppZiAoICRkYXRhID1+IG0hXlxbKFxkezR9LVxkezJ9LVxkezJ9KVxzKyhcZHsyfTpcZHsyfTpcZHsyfSkuKjxlbWFpbEFkZHJlc3M+KC4qKTxcL2VtYWlsQWRkcmVzcz4hZ3MgKXsKCXByaW50ICIkMSAkMiAkMyI7CQp9