Re^2: Tk subroutine

How funny am i ?

Not very funny. How do you expect $count to increase if it is a lexical inside the sub?

#countig posting
 my $count +=1;
print $count;
[download]

From that snippet I would expect $count to be 1 every time through the sub.

--shmem

_($_=" "x(1<<5)."?\n".q·/)Oo.  G°\        /
                              /\_¯/(q    /
----------------------------  \__(m.====·.(_("always off the crowd"))."·
");sub _{s./.($e="'Itrs `mnsgdq Gdbj O`qkdq")=~y/"-y/#-z/;$e.e && print}

Comment on Re^2: Tk subroutine Select or Download Code