Processing ARGV

kmullin has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Processing ARGV by moritz (Cardinal) on Dec 05, 2007 at 17:56 UTC
It looks as if the script is not executed by perl at all. Try to run `perl textARGV.pl foo bar` on your command line instead.	[reply] [d/l]
Re: Processing ARGV by friedo (Prior) on Dec 05, 2007 at 17:57 UTC
The errors you're getting sound like you're actually running the program through a shell rather than perl. What happens when you type `perl testARGV.pl`?	[reply] [d/l]
Re^2: Processing ARGV by kmullin (Acolyte) on Dec 05, 2007 at 18:14 UTC
Interesting. When I run: `perl testARGV.pl 1 2 3 4 5` [download] then I get Start of testARGV.pl and thats it! the error messages are gone, but where are the values I am trying to print? And I have the shebang in my code specifying `#!/opt/third/party/bin/perl -w` [download] and I've verified that it does exists. (Its even in my PATH). When I do: `/opt/third-party/bin/perl -v` [download] I see This is perl, v5.6.0 built for Linux-2.4c2.3-i686 Copyright 1987-2000, Larry Wall Perl may be copied only under the terms of either the Artistic License + or the GNU General Public License, which may be found in the Perl 5.0 source +kit. Complete documentation for Perl, including FAQ lists, should be found +on this system using `man perl' or `perldoc perl'. If you have access to + the Internet, point your browser at http://www.perl.com/, the Perl Home Pa +ge. [download] Any more comments? Why don't I get my command line arguments.	[reply] [d/l] [select]
Re^3: Processing ARGV by chaos_cat (Scribe) on Dec 05, 2007 at 18:49 UTC
At the risk of pointing out the obvious, or a typo on your part, the path you give for printing the perl version is not the same path you have in your shebang line. Specifically 'third/party' ne 'third-party'.	[reply]
Re^3: Processing ARGV by sh1tn (Priest) on Dec 05, 2007 at 18:29 UTC
You may want to try `perl -e 'print $_, $/ for @ARGV' 1 2 3 4 5 #which prints #1 #2 #3 #4 #5` [download] in order to assure yourself that perl has been installed correctly. And of course - see what `which perl` returns in case that the script works fine.	[reply] [d/l]
Re^4: Processing ARGV by kmullin (Acolyte) on Dec 05, 2007 at 19:08 UTC
Re^3: Processing ARGV by friedo (Prior) on Dec 05, 2007 at 18:20 UTC
Odd. It works fine for me. `$ perl testARGV.pl 1 2 3 Start of testARGV.pl 123` [download]	[reply] [d/l]
Re: Processing ARGV by almut (Canon) on Dec 05, 2007 at 18:10 UTC
It seems your perl binary is in fact a `zsh` :) — at least, if I change the shebang line in your script to `#!/bin/zsh -w` I do get similar garbage output on my box: `$ ./655145.pl Start of testARGV.pl ./655145.pl:3: command not found: 0 ./655145.pl:5: unknown file attribute` [download]	[reply] [d/l] [select]
Re^2: Processing ARGV by kmullin (Acolyte) on Dec 05, 2007 at 18:57 UTC
Wow, so your bringing my version of perl into question. I have found 3 versions of perl on our system, and perhaps ther are more, but I get three different responses to the -v option. When I run: /apollo/env/fulfillmentCenter/var/apps/perl -v I get `This is perl, v5.8.8 built for Linux-2.4c2.3-i686-64int + Copyright 1987-2006, Larry Wall + Perl may be copied only under the terms of either the Artistic License + or the GNU General Public License, which may be found in the Perl 5 source ki +t. + Complete documentation for Perl, including FAQ lists, should be found +on this system using "man perl" or "perldoc perl". If you have access to + the Internet, point your browser at http://www.perl.org/, the Perl Home Pa +ge.` [download] and when I run /usr/bin/perl -v I get This is perl, v5.8.0 built for i386-linux-thread-multi (with 1 registered patch, see perl -V for more detail) Copyright 1987-2002, Larry Wall Perl may be copied only under the terms of either the Artistic License + or the GNU General Public License, which may be found in the Perl 5 source ki +t. Complete documentation for Perl, including FAQ lists, should be found +on this system using `man perl' or `perldoc perl'. If you have access to + the Internet, point your browser at http://www.perl.com/, the Perl Home Pa +ge. [download] and when I run the version that is in my perl script: /opt/third-party/bin/perl -v I get This is perl, v5.6.0 built for Linux-2.4c2.3-i686 Copyright 1987-2000, Larry Wall Perl may be copied only under the terms of either the Artistic License + or the GNU General Public License, which may be found in the Perl 5.0 source +kit. Complete documentation for Perl, including FAQ lists, should be found +on this system using `man perl' or `perldoc perl'. If you have access to + the Internet, point your browser at http://www.perl.com/, the Perl Home Pa +ge. [download] Which is not even the latest version. I'm going to my internal people on this one.	[reply] [d/l] [select]
Re: Processing ARGV by plobsing (Friar) on Dec 06, 2007 at 03:28 UTC
This doesn't solve your immediate problem, but it may come and bite you eventually. Your program will act as if no arguments were passed if you only passed one argument due to the line: `if ($#ARGV != 0)` [download] What you probably want is: `if (@ARGV)` [download]	[reply] [d/l] [select]
Re: Processing ARGV by Erez (Priest) on Dec 06, 2007 at 08:50 UTC
I'd appreciate any perls of wisdom you may have for me. If you really want to get the goods from Perl, I encourage you to learn the language's idioms. `if ($#ARGV != 0) { foreach( @ARGV )` [download] could be summed as `while (@ARGV)` and `print $_` can be written `print;`. Perl DWYM in running all those checks for you. `Software speaks in tongues of man; I debug, therefore I code.`	[reply] [d/l] [select]