Select Code to Download

 use Data::Dumper;
 print Dumper(@image_array);

 use Data::Dumper;
 print Dumper \@image_array;

#!/usr/bin/perl
use warnings;
...
}

print Dumper \@image_array;