Select Code to Download

c:\@Work\Perl\monks>perl -wMstrict -le
"use Data::Dump qw(dd);
...
  ["A12a1", "img5", "x456", "y456"],
  ["A21a1", "img8", "x888", "y888"],
]

c:\@Work\Perl\monks>perl -le
"use warnings;
...
1..1
ok 2 - no warnings
1..2