Dogcows Code - chaz/p5-CGI-Ex/blob - t/samples/perl2.pl

   1 ### this yaml will return an arrayref containing three hashrefs
   2 ### this shows three groups
   3 ### the first two groups have validate_if's
   4 [
   5    {
   6      'group validate_if' => 'foo',
   7      bar => {
   8        required => 1,
   9      },
  10    },
  11    {
  12      'group validate_if' => 'hem',
  13      haw => { required => 1 },
  14    },
  15    {
  16      raspberry => {
  17        required => 1,
  18      },
  19    },
  20 ];