$image->Draw( fill     =>'rgba(100,0,0,0.55)',
              primitive=>'rectangle',
              points   =>$box_left_x,$box_left_y,
                         $box_x,$box_y 
);