Re: Re: Invalid use of constant pragma?

The fact that $ARGV[1] (thus ARCHIVE) is undef and not an empty string isn't really relevent. He's doing a test for string equality via eq, and undef stringifies to an empty string, so the test should succeed.

$ perl -e 'print "OK\n" if undef eq ""'
OK
[download]

Comment on Re: Re: Invalid use of constant pragma? Select or Download Code

Replies are listed 'Best First'.
Invalid use of constant pragma? by mikeB (Friar) on Nov 29, 2001 at 20:50 UTC
D'Oh! You are, of course, correct :/ I'll just pass along tye's CB suggestion that perhaps `use strict;` would be in order, to verify no typos exist in the actual code. Mike `use strict;` - don't leave home without it	[reply] [d/l] [select]


Your skill will accomplish what the force of many cannot
	PerlMonks