Select Code to Download

use strict; use warnings; use feature 'say';
use Data::Dumper;
...
say Dumper \@rows;

__END__

$ perl monks/1226220.pl

...
          ]
        ];