in reply to Re^2: Moose and YAML
in thread Moose and YAML

YAML just "works" with objects too:
use strict; use warnings; use 5.010; use YAML qw/Dump Bless Load/; use Data::Dumper; { package Foo; use Moose; has foo => ( is => 'rw', isa => 'Any' ); has bar => ( is => 'rw', isa => 'Any' ); } my $foo = Foo->new( foo => 'fooValue', bar => 'barValue' ); print 'Dumper original object: ', Dumper(\$foo); my $yaml_foo = Dump $foo; # Serialize object to YAML my $other_foo = Load ($yaml_foo); # Deserialize to Foo say 'Dumper new object: ',Dumper(\$other_foo); say $other_foo->isa('Foo') ? 'I am a Foo!' : 'I do not know what I am. +';
As expected it returns:
Dumper original object: $VAR1 = \bless( { 'bar' => 'barValue', 'foo' => 'fooValue' }, 'Foo' ); Dumper new object: $VAR1 = \bless( { 'bar' => 'barValue', 'foo' => 'fooValue' }, 'Foo' ); I am a Foo!

CountZero

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

Replies are listed 'Best First'.
Re^4: Moose and YAML
by llancet (Friar) on Apr 28, 2010 at 05:43 UTC
    Ok... I mean 'work with specific keys of a object'.
      Um, whats that mean? What kind of output do you expect, and how does it differ from what you get?
        In my example, the Blessed hashref can only produce:
        --- foo: fooValue
        after set keys. I want this also work with Blessed blessed hashref.