open (my $MYFILE,'<', $my_picture_file)  or die "Cannot open file....$!";
binmode $MYFILE;