Select Code to Download

# A right-click in the viewer should bring up the popup menu.
$viewer->bind("<3>", [\&post_popup_menu]);
...
  my $Y = $w->XEvent->Y;
  $viewer_menu->Post($X, $Y);
}