$image = $mw->Photo(-format => 'Window',
        -data => oct($JTADisplay->id));
    $filename = 'myimage.jpg';
    $image->write($filename, -format => 'JPEG');