HTTP/2 302
server: nginx
date: Mon, 04 Aug 2025 08:46:26 GMT
content-type: text/plain; charset=utf-8
content-length: 0
x-archive-redirect-reason: found capture at 20090706092035
location: https://web.archive.org/web/20090706092035/https://www.perl.com/pub/a/1999/10/perltk/index.html
server-timing: captures_list;dur=0.910914, exclusion.robots;dur=0.038799, exclusion.robots.policy;dur=0.022884, esindex;dur=0.013858, cdx.remote;dur=18.163210, LoadShardBlock;dur=339.248804, PetaboxLoader3.datanode;dur=131.423712
x-app-server: wwwb-app28
x-ts: 302
x-tr: 392
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1
set-cookie: wb-p-SERVER=wwwb-app28; path=/
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
HTTP/2 200
server: nginx
date: Mon, 04 Aug 2025 08:46:26 GMT
content-type: text/html; charset=ISO-8859-1
x-archive-orig-date: Mon, 06 Jul 2009 09:20:08 GMT
x-archive-orig-server: Apache
x-archive-orig-p3p: policyref="https://www.oreillynet.com/w3c/p3p.xml",CP="CAO DSP COR CURa ADMa DEVa TAIa PSAa PSDa IVAa IVDa CONo OUR DELa PUBi OTRa IND PHY ONL UNI PUR COM NAV INT DEM CNT STA PRE"
x-archive-orig-content-length: 25076
x-archive-orig-connection: close
x-archive-guessed-content-type: text/html
x-archive-guessed-charset: utf-8
memento-datetime: Mon, 06 Jul 2009 09:20:35 GMT
link:
; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Mon, 23 Jul 2001 16:27:17 GMT", ; rel="prev memento"; datetime="Sat, 06 Jun 2009 13:27:24 GMT", ; rel="memento"; datetime="Mon, 06 Jul 2009 09:20:35 GMT", ; rel="next memento"; datetime="Thu, 13 Oct 2011 18:36:24 GMT", ; rel="last memento"; datetime="Sat, 09 Jul 2022 22:12:06 GMT"
content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org
x-archive-src: portuguese-web-archive-AWP4chkpt52009-20090706055153/IAH-20090706073935-17523-awp01.fccn.pt.arc.gz
server-timing: captures_list;dur=0.925718, exclusion.robots;dur=0.040574, exclusion.robots.policy;dur=0.024872, esindex;dur=0.013761, cdx.remote;dur=26.087686, LoadShardBlock;dur=74.515443, PetaboxLoader3.datanode;dur=139.532328, load_resource;dur=176.216291, PetaboxLoader3.resolve;dur=96.148944
x-app-server: wwwb-app28
x-ts: 200
x-tr: 398
server-timing: TR;dur=0,Tw;dur=0,Tc;dur=1
x-location: All
x-rl: 0
x-na: 0
x-page-cache: MISS
server-timing: MISS
x-nid: DigitalOcean
referrer-policy: no-referrer-when-downgrade
permissions-policy: interest-cohort=()
content-encoding: gzip
perl.com: Perl/Tk Tutorial
We've expanded our Perl news coverage and improved our search! Search for all things Perl across O'Reilly!
Perl/Tk Tutorial
by Lee Minniear , Brett Berry
October 15, 1999
This presentation was created for a meeting of AZSage (see https://www.azsage.org ). "I had been attending monthly
AZSage meetings for over a year," said Brett Berry, "and finally I had something worth
presenting. The presentation was aimed at the Perl/Tk novice, and there
was a whole lot of ad-lib comedy to keep the mood light, and the people
awake!"
On Perl.com, we are presenting this as part of what we hope will be an ongoing series of articles, titled
"Source Illustrated." The presentation by Lee and Brett is a wonderfully concise example of showing
annotated code and its result. There's no running narrative; just a code-walkthrough that is a very
interesting way to learn how these examples work.
Lee Minniear and Brett Berry are in business together, offering the world Business
Card CDs and such. Visit them at
SculptedCD.com
