my $ref = Lala->newlala();
  $ref->setname("Moufa");
  my $name = $ref->getname();
  print "Got name(ref): $name\n";
  my $ref1 = Lala->newlala();
  $ref1->setname("Troufa");
  $name = $ref1->getname();
  print "Got name(ref1): $name\n";
  my $ref2 = Lala->newlala();
  $ref2->$name="TRalala";
  $name = $ref2->getname();
  print "Got name(ref2): $name\n";