Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re^4: Has anyone seen perl losing arguments?

by ted.byers (Scribe)
on Sep 29, 2011 at 15:28 UTC ( #928599=note: print w/ replies, xml ) Need Help??

in reply to Re^3: Has anyone seen perl losing arguments?
in thread Has anyone seen perl losing arguments?

Thanks for your help

No, I didn't dumper it. rather, I just print intermediate results, until the program has been shown to be working OK.

The shell is Windows Server Web's cmd

Here are the contents of my script:

use strict; use warnings; use IPC::System::Simple qw(system systemx capture capturex); $| = 1; my $cmd = ' qwerty asdfghjk zxcv'; my $op = `$cmd`; print "==============\n",$op,"\n\n=================\n"; my @args; push @args,''; push @args,"\"qwerty 12354\""; push @args,'asdfg'; push @args,'zxcvbnm'; system('perl',@args); print "\n\n==============\n"; systemx('perl',@args); print "\n\n==============\n";

And there are the contents of ''

print "$ARGV[0]\n\t$ARGV[1]\n\t\t$ARGV[2]\n";

and here is what is written to standard out:

C:/Perl64.v.5.14/bin\perl.exe -w c:/Work/ ============== ================= qwerty 12354 asdfg zxcvbnm ============== qwerty 12354 asdfg zxcvbnm ==============

So, it is clear that my way forward is to use IPC::System::Simple. But what is not clear is why using the default system and back ticks worked fine on WIndows 7, Windows XP, and Windows Server 2003, but fails miserably on Windows Server Web. But I am not going to worry too much about that as long as I can quickly get these programs working again.

Thanks again.

Comment on Re^4: Has anyone seen perl losing arguments?
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://928599]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (12)
As of 2014-11-27 18:43 GMT
Find Nodes?
    Voting Booth?

    My preferred Perl binaries come from:

    Results (187 votes), past polls