Select Code to Download

use 5.010;
use MooseX::Declare;
...
                                  hostname  => 'localhost' },
                            master      => Server->new( { hdr => 1 } )
+ );

Validation failed for 'MooseX::Types::Structured::Tuple[MooseX::Types:
+:Structured::Tuple[Object],MooseX::Types::Structured::Dict[mgr,Manage
+r,debug,MooseX::Types::Structured::Optional[Int],user,Str,pass,Str,pa
+th,__ANON__,target_args,__ANON__,master,MooseX::Types::Structured::Op
+tional[__ANON__]]]' failed with value [ [ Archive=HASH(0x2a012a8) ], 
+{ master => Server=HASH(0x2a7ce38), mgr => Manager=HASH(0x2a708e0), p
+ass => "secret", path => "d:\data\DYV\", target_args => HASH(0x1aa3ad
+8), user => "boldra" } ], Internal Validation Error is: Validation fa
+iled for 'MooseX::Types::Structured::Dict[mgr,Manager,debug,MooseX::T
+ypes::Structured::Optional[Int],user,Str,pass,Str,path,__ANON__,targe
+t_args,__ANON__,master,MooseX::Types::Structured::Optional[__ANON__]]
+' failed with value { master => Server={ hdr => 1 }, mgr => Manager={
+  }, pass => "secret", path => "d:\data\DYV\", target_args => { NR =>
+ 01, SID => 1, hostname => "localhost" }, user => "boldra" } at /usr/
+lib/perl5/site_perl/5.10/MooseX/Method/Signatures/Meta/Method.pm line
+ 445
    MooseX::Method::Signatures::Meta::Method::validate('MooseX::Method
+::Signatures::Meta::Method=HASH(0x2a7cec8)', 'ARRAY(0x29e1788)') call
+ed at /usr/lib/perl5/site_perl/5.10/MooseX/Method/Signatures/Meta/Met
+hod.pm line 145
    Archive::init_archive('Archive=HASH(0x2a012a8)', 'user', 'boldra',
+ 'pass', 'secret', 'path', 'd:\data\DYV\', 'mgr', 'Manager=HASH(0x2a7
+08e0)', ...) called at /home/boldra/archive_test.pl line 40