sub new {
    my @cols = split /;/, shift, -1;
    $cols[2] =~ s/=(.+)/=/;
    $cols[2] .= ' ' x length $1;
    return join ';', @cols, $1
}