Someone

[debug] cats = $VAR1 = {
          'Hexagon' => [
                         {
                           'cat' => '4140 annealed',
                           'page' => 1
                         }
                       ],
          'Round' => [
                       {
                         'to' => '4',
                         'cat' => '4140 annealed',
                         'page' => 1,
                         'from' => '1/4'
                       },
                       {
                         'to' => '6',
                         'cat' => '4140 annealed',
                         'page' => 2,
                         'from' => '5-1/2'
                       },
                       {
                         'to' => '5',
                         'cat' => '4140 heat treat',
                         'page' => 1,
                         'from' => '3/8'
                       },
                       {
                         'to' => '6',
                         'cat' => '4140 heat treat',
                         'page' => 2,
                         'from' => '5-1/4'
                       },
                       {
                         'cat' => '41l40 annealed',
                         'page' => 1
                       },
                       {
                         'cat' => '4340 annealed',
                         'page' => 1
                       },
                       {
                         'cat' => '8620',
                         'page' => 1
                       },
                       {
                         'cat' => 'e4130 norm aq',
                         'page' => 1
                       }
                     ],
          'Flat' => [
                      {
                        'to' => '1 x 4',
                        'cat' => '4140 annealed',
                        'page' => 1,
                        'from' => '1/4 x 1'
                      },
                      {
                        'to' => '2 x 6',
                        'cat' => '4140 annealed',
                        'page' => 2,
                        'from' => '1 x 5'
                      }
                    ],
          'Square' => [
                        {
                          'cat' => '4140 annealed',
                          'page' => 1
                        }
                      ]
        };