Select Code to Download

use diagnostics -v;
use Data::Dumper;
...
### YOUR CODE ###

print Dumper(@$sets);