The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
$expected = {
  'test02.p' => {
      '11' => [ 1 ],
      '21' => [ 1 ],
      '3' => [ 2 ],
      '7' => [ 7 ],
      '2' => [ 2 ],
      '12' => [ 1 ],
      '15' => [ 1 ],
      '14' => [ 1 ],
      '20' => [ 1 ],
      '18' => [ 1 ],
      '19' => [ 1 ],
      '13' => [ 1 ]
    }
};