sub print_item3 {
  my ($self) = @_;
  print $self->{a_hash}{item3}{name} . " : " . $self->{a_hash}{item3}{value} . "\n";
}