Select Code to Download

#!/usr/bin/perl -w

...
#  |H  PPPPPPPPPPPPPPPPPPPPPPPP  G|  |HPPPPPPPPPPPPPPPPPPPPPPPPPPPPG|
#  +------------------------------+  +------------------------------+
#

    $canvas->configure(-highlightthickness => 0);