Help for this page

Select Code to Download


  1. or download this
    use Test::More tests => 1;
    use Data::Dumper;
    'cow' =~ /
    ...
        '@+' => [ 3, 3 ],
    });
    is( $got, $expected );
    
  2. or download this
    #   Failed test at bin/ooga.pl line 24.
    #          got: '$VAR1 = {
    #           '%+' => {},
    ...
    #                   ]
    #         };
    # '