in reply to Stray Variables
always use strict and -w. Is there a reason you are not?
Perhaps I am misunderstanding what you might need (say you are using -w), have a look at Tie::Scalar::Timeout (also hash and array), more of an OO approach.
In Section
Seekers of Perl Wisdom