xref: /openbsd/gnu/usr.bin/perl/t/porting/bench/badhash (revision 5759b3d2)
1*5759b3d2Safresh1#!perl
2*5759b3d2Safresh1# for the use of t/porting/bench.pl.
3*5759b3d2Safresh1#
4*5759b3d2Safresh1# A file to load which has an invalid hash key
5*5759b3d2Safresh1
6*5759b3d2Safresh1
7*5759b3d2Safresh1[
8*5759b3d2Safresh1    'foo::bar' => {
9*5759b3d2Safresh1        desc    => 'my $x = "abc"',
10*5759b3d2Safresh1        setup   => '',
11*5759b3d2Safresh1        code    => 'my $x = "abc"',
12*5759b3d2Safresh1        blah    => 1,
13*5759b3d2Safresh1    },
14*5759b3d2Safresh1];
15*5759b3d2Safresh1
16