Re: OT - Perl Question

2003-11-11 Thread Matthew Seaman
On Tue, Nov 11, 2003 at 02:57:04PM -0600, Darryl Hoar wrote:
> I am trying to learn perl.  I am going through a tutorial and have come
> across a syntax error I can't figure out.
> 
> Here's the code:
> 
> print "Please tell me your name: ";
> chop ($name=);
> 
> print "Please tell me your nationality: ";
> chop ($nation=);
> 
> if ( $nation eq "British"  or  $nation eq "New Zealand" )
> {
>  print "Hallo $name, pleased to meet you!\n";
> 
> }
> 
> when I try to run it, it generates a compile errors on the
> if line.
> 
> I know its the conditional test, but don't know how to fix
> it to be syntactically correct in perl.
> 
> Any help?

Works fine if you ask me:

happy-idiot-talk:/tmp:% cat > foo.pl
#!/usr/bin/perl -w

print "Please tell me your name: ";
chop ($name=);

print "Please tell me your nationality: ";
chop ($nation=);

if ( $nation eq "British"  or  $nation eq "New Zealand" )
{
 print "Hallo $name, pleased to meet you!\n";

}

happy-idiot-talk:/tmp:% perl -cw foo.pl 
foo.pl syntax OK
happy-idiot-talk:/tmp:% chmod +x foo.pl 
happy-idiot-talk:/tmp:% ./foo.pl 
Please tell me your name: Matthew
Please tell me your nationality: British
Hallo Matthew, pleased to meet you!

There was probably a typo in your original script which you've managed
to inadvertently fix when you copied your code into the e-mail.

Cheers,

Matthew


-- 
Dr Matthew J Seaman MA, D.Phil.   26 The Paddocks
  Savill Way
PGP: http://www.infracaninophile.co.uk/pgpkey Marlow
Tel: +44 1628 476614  Bucks., SL7 1TH UK


pgp0.pgp
Description: PGP signature


Re: OT - Perl Question

2003-11-11 Thread Fernando Gleiser
On Tue, 11 Nov 2003, Darryl Hoar wrote:

>
> if ( $nation eq "British"  or  $nation eq "New Zealand" )
> {
>  print "Hallo $name, pleased to meet you!\n";
>
> }
>
> when I try to run it, it generates a compile errors on the
> if line.
>
> I know its the conditional test, but don't know how to fix
> it to be syntactically correct in perl.

Precedence errors, change it to:

if ( ($nation eq "British")  ||  ($nation eq "New Zealand") )

When in doubt, parentesize defensivelly :)

Hope this helps.


Fer

>
> Any help?
>
> thanks,
> -D
> ___
> [EMAIL PROTECTED] mailing list
> http://lists.freebsd.org/mailman/listinfo/freebsd-questions
> To unsubscribe, send any mail to "[EMAIL PROTECTED]"
>

___
[EMAIL PROTECTED] mailing list
http://lists.freebsd.org/mailman/listinfo/freebsd-questions
To unsubscribe, send any mail to "[EMAIL PROTECTED]"