in reply to Weird eq behaviour
my $from = '<>'; my $to = '<>'; if (!$from || !$to || $from eq "<>" || $to eq "<>" ) {print "Ok 1\n +"} if (!$from || !$to || $from =~ /^<>$/ || $to =~ /^<>$/) {print "Ok 2\n +"} __END__ Prints: Ok 1 Ok 2
--
John.
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: Weird eq behaviour
by Cine (Friar) on Jul 25, 2002 at 12:51 UTC |