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-