Select Code to Download

    my @tags;
    my $i = 0;
...
    }
use Data::Dumper;
print Dumper(@tags);

$VAR1 = {
          'contents' => undef,
          'name' => 'France'
...
          'contents' => undef,
          'name' => 'Things to do in France'
        };