open(IMG, '>img.jpg');
binmode IMG;
print IMG $answer;
close(IMG);