Select Code to Download

my @image2D=undef;
for(my $ix=0; $ix<scalar @tempimage; $ix++)
...
    $image2D[$ix][$iy]=$temp[$iy];
    }                
}