Select Code to Download

key             : /C=US/A=BOGUS/P=ABC+DEF/O=CONN/OU=VALUE1/S=Region/G=
+Limbi
        c/I=_/
...
Building        : BLAH
Building-Code   : MD-ABC
owner           : CONN

#!/usr/bin/perl -w
use strict;
...
    $record{key}->{Tel} = "(123) 456-7890";
    print DBParser::PrintRecord;
}