[lug] Print warnings from Perl...

[John Hernandez]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Chip Atkinson wrote:
| Greetings,
|
| I'm trying to print a close parenthesis ()) in perl and get warnings
when
| trying to do so when using the -w option.  Any ideas on how to stop the
| warnings?
|
| Here's the program and output:
|
| chip 17> perl -w syn.pl
| print (...) interpreted as function at syn.pl line 4.
| print (...) interpreted as function at syn.pl line 5.
| print (...) interpreted as function at syn.pl line 6.
| X
| )
| \))
|
| chip 18> cat syn.pl
| #!/usr/bin/perl
|
| print ("X\n");
| print ("\)\n");
| print ('\)');
| print (")\n");
|

Do you need the enclosing parens?  Try:

print ')';

or

print ")";

- --

~ |  John Hernandez - NOAA Boulder NOC - 303-497-6392
~ |  Mailstop R/OM62. 325 Broadway, Boulder, CO 80305
~ |  PGP Public Key ID: 586A7E23
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.0.7 (GNU/Linux)
Comment: Using GnuPG with Mozilla - http://enigmail.mozdev.org

iD8DBQE+Lb6GB1Kl6VhqfiMRAlM9AJ9wXVHemH+uWJOTjfzmKvv7Udq3YQCgh4f2
ddPQaaqtqIz2iz1JvJYFHNY=
=Uw2y
-----END PGP SIGNATURE-----