if (($before ne 'Z' && $after eq 'Z')
    || ($before eq 'Z' && $after ne 'Z'))
{
    # change from A|B <=> Z
}

if (($before eq 'Z' || $after eq 'Z')
    && !($before eq 'Z' && $after eq 'Z'))
{
    # change from A|B <=> Z
}