コードリファレンスのシリアライズとデシリアライズ use strict; use warnings; use YAML; use Data::Dumper; $Data::Dumper::Deparse = 1; { no warnings ('once'); $YAML::UseCode = 1; } my $obj = { hello => sub { print "hello\n"; }, name => "hoge", }; # serialize my $yaml = YAML::Dump($obj); warn $yaml; # deserialize my $obj2 = YAML::Load($yaml); warn Dumper $obj2; # call coderef $obj2->{hello}->(); $YAML::UseCode = 1で$YAML::Load