Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re^6: System() in list mode?

by 1337John (Initiate)
on Oct 17, 2011 at 22:04 UTC ( #932026=note: print w/replies, xml ) Need Help??

in reply to Re^5: System() in list mode?
in thread System() in list mode?

But I can't use PATH... Which makes no sense if there is absolutely no shell interaction. I also do notice that space, that's exactly why I'm trying to get this working. The problem I have is setting an environment variable called PATH because my script uses it. I don't really care much for a variable called WHAT. And rewriting the script is not an option.

P.s. thanks for the help so far!

Replies are listed 'Best First'.
Re^7: System() in list mode?
by onelesd (Pilgrim) on Oct 17, 2011 at 22:14 UTC

    So replace WHAT with PATH and your script will see $PATH just fine. I used WHAT because the name of the variable does not matter since you are not using a shell in LIST mode, and PATH has no more special meaning than WHAT does.

    Beyond that, the only problem I see in your posted code is that you don't give a full path to /bin/bash (and $path isn't defined, but maybe you did that elsewhere).

Re^7: System() in list mode?
by Khen1950fx (Canon) on Oct 19, 2011 at 05:54 UTC

    Which makes no sense if there is absolutely no shell interaction

    That's not exactly correct. Remember the magic of Perl---the impossible is always possible. Here's an example. It requires: IPC::System::Simple.
    !/usr/bin/perl -l use strict; use warnings; use IPC::System::Simple qw(capturex systemx); my $PATH = $ENV{'PATH'}; my $SHELL = $ENV{'SHELL'}; my $path = '/root/Desktop/test a folder/this'; my @arr1 = ( "printenv", "PATH" ); capturex(@arr1); my @arr2 = ( "echo", "$PATH" ); systemx(@arr2); my @arr3 = ("$SHELL", "$path"); my @script = system(@arr3);

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://932026]
[hippo]: Too true :)

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (8)
As of 2018-06-22 09:58 GMT
Find Nodes?
    Voting Booth?
    Should cpanminus be part of the standard Perl release?

    Results (124 votes). Check out past polls.