こんなんで、 1 use strict; 2 use warnings; 3 4 use Params::Validate qw/:all/; 5 6 sub hoge { 7 8 my %hash = validate( @_, 9 { 10 hoge => 2, 11 tage => 1, 12 } 13 ); 14 } 15 16 hoge( 17 { 18 hoge => 2 19 } 20 ); こんな感じ。 あとは、タイプ…

下記見てきになった。 return if $NO_VALIDATION && ! defined wantarray; list要求かどうかの判定でした。http://www2u.biglobe.ne.jp/~MAS/perl/ref/wantarray.html http://search.cpan.org/src/DROLSKY/Params-Validate-0.86/lib/Params/ValidatePP.pm