print Dumper ($self->result->{Abcd});

  print "\n Platform ="; print Dumper ($self->result->{Abcd}->{Platform});
  print "\n abcdname ="; print Dumper ($self->result->{Abcd}->{AbcdName});