Help for this page

Select Code to Download


  1. or download this
    print '<ul>';
    print qq,<li>\[id://$_]\n, for qw,
    ...
    ,;
    print '</ul>';
    __END__
    
  2. or download this
    use strict;
    use warnings;
    ...
    widget: Tk::Canvas=HASH(0x232b3d4)  x: 0326, y: 0322  modifier: Shift-
    +Mod1- 
    widget: Tk::Canvas=HASH(0x232b3d4)  x: 0325, y: 0322  modifier: Shift-
    +Mod1- 
    widget: Tk::Canvas=HASH(0x232b3d4)  x: 0324, y: 0322  modifier: Shift-
    +Mod1-