Hello There.
Just a few notes:
1. I learned that return inside an eval block inside a sub, exits from
the eval, not from the sub.
2. When using Tk, it takes control on $SIG{__DIE__}, so my exceptions
did not pass through. I did 'local $SIG{__DIE__}', at the beginning of
the function, and everything was back to normal.
3. I like the construct:
$result = {'string1'=>val1, 'string2'=>val2,...}->{$value};
it's like a switch/multiple if, in a nice package.
That's it.
Good night.
Shmuel.
_______________________________________________
Perl mailing list
[email protected]
http://perl.org.il/mailman/listinfo/perl