sub describe {
      my %person = @_;
      print "$person{name} is a $person{job}"
    }

    describe(  {name=>'buffy',job=>'vampire slayer' }  );

    # result: ' is a '