print "

"; print "
FtchObjtDets

"; foreach my $mykey (sort keys %myobjtdets) { print "$mykey - $myobjtdets{$mykey}
"; } print ""; exit;