This is not working either!!!!
# Goal, to check against two different passwords.
#!/usr/bin/perl
my $qs = 'c';
my $secret_word = 'a';
my $secret_word_guest = 'b';
if ($qs !~ /$secret_word_guest|$secret_word/) {
print "fail\n";
} else { print "go, ok\n";}
... more code...
What should happen is that if $secret_word OR $secret_word_guest does not Match $qs
Then it should print 'Fail'.
Please see if you can explain why this in not working,
Dave
---------
OSX, Jaguar
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]