Re^3: Perl script runs fine if exec'd from the directory, but gives error if run outside the directory.

"Also there's no $text variable in my script nor am I doing any substitution. Even if I embed the username and password in the script I still get the error."

The error tells you exactly where this is coming from:

G:\>perl cdr_vnxe\cedar_rapids_vnxe_v2.pl
Use of uninitialized value $text in substitution (s///) at G:/Strawber
+ry/perl/vendor/lib/Win32/ShellQuote.pm line 85.
[download]

"What baffles me is the script works fine if I run it from the directory where its in. No errors whatsoever. Just when I run it with the path, the error comes up. "

You have:

my $array_creds = Config::Tiny->new();
$array_creds   = Config::Tiny->read('vnxe_config.conf');
[download]

Consider the following example:

#!/usr/bin/perl
use strict;
use warnings;

use Config::Tiny;
my $Config = Config::Tiny->new;
$Config = Config::Tiny->read( 'file.conf' );
print "$Config->{_}{var1}\n";
[download]

When run from the directory containing your config file:

marto@Marto-Desktop:~/code$ ./cf.pl 
derp
[download]

When run from the parent directory:

marto@Marto-Desktop:~$ ./code/cf.pl 
Use of uninitialized value in concatenation (.) or string at ./code/cf
+.pl line 8.
[download]

As you see, the code can't find the config file.

#!/usr/bin/perl
use strict;
use warnings;

use File::Basename;
my $dirname = dirname(__FILE__);
use Config::Tiny;
my $Config = Config::Tiny->new;
$Config = Config::Tiny->read( "$dirname/file.conf" );
print "$Config->{_}{var1}\n";
[download]

Runs fine:

marto@Marto-Desktop:~$ ./code/cf.pl 
derp
[download]

Update: IPC::Run3 needs Win32::ShellQuote because you are on Windows. https://metacpan.org/source/RJBS/IPC-Run3-0.048/Makefile.PL#L13.

Comment on Re^3: Perl script runs fine if exec'd from the directory, but gives error if run outside the directory. Select or Download Code

Replies are listed 'Best First'.
Re^4: Perl script runs fine if exec'd from the directory, but gives error if run outside the directory. by pritesh_ugrankar (Monk) on Oct 02, 2020 at 19:30 UTC
Hi Marto, Thank you for the fantastic clarification.	[reply] [d/l] [select]
Re^5: Perl script runs fine if exec'd from the directory, but gives error if run outside the directory. by marto (Cardinal) on Oct 03, 2020 at 09:42 UTC
No problem, let me know if you have any further questions about this. As Grandfather mentioned earlier, it's often much simpler to provide a short example which reproduces the problem, rather than post the entire script.	[reply]
Re^6: Perl script runs fine if exec'd from the directory, but gives error if run outside the directory. by GrandFather (Saint) on Oct 04, 2020 at 03:05 UTC
In this case, as is often the case, the problem would have been found in the process of whittling down the code. That is often by far the best outcome in my view. Optimising for fewest key strokes only makes sense transmitting to Pluto or beyond	[reply]