use Data::Dumper;
# in your loop put...
print Dumper \$combination;