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