c:\strawberry\perl\bin\perl -w .\tst02.pl
Use of uninitialized value $id in hash element at c:/strawberry/perl/site/lib/Tk/After.pm line 39.