> > #!/usr/bin/perl > use strict; > use warnings; > > our ($upper, $lower, $target) = ( 20, 1, 11 ); >
D'oh! I really _meant_ to make those lexical instead of package variables - another good habit to get in early. my ($upper, $lower, $target) = (20,1,11); -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>