$VAR1 = bless( {
  'Creature::gender' => 'female',
  'Creature::name'   => 'Alice'
}, 'Creature' );