$hlist->itemCreate(
  $y, $x, 
  -itemtype => image', 
  -image => $mw->Photo(-data => $image, -format => 'xpm'), 
  -style => $style);