my $info= $snapshot->type; print ("image info : $info"); #debug