Select Code to Download

use strict;
use warnings;
...
   )[ -1 ];

print Data::Dumper->Dumpxs( [ \ @filtered ], [ qw{ *filtered } ] );

@filtered = (
              {
...
                'acc' => '1111'
              }
            );