Thanks. This works fine using Perl 5.6.1, but doesn't work under Perl 5.8. Under Perl 5.8 it prints:

One
Untie
4
Two
Untie
4
Three
Untie
4
[download]

:-(((

I tried to untie a different variable within the sub{} and that works, but untieing the variable whose FETCH handler is being processed simply doesn't work :-(

Jenda
Always code as if the guy who ends up maintaining your code will be a violent psychopath who knows where you live.
   -- Rick Osborne

Edit by castaway: Closed small tag in signature