Help for this page

Select Code to Download

Select or download this

use Data::Dumper;

...
          $last_33 = $_->{ TEST33 };
          push (@list, $_);
       }