syntax to source env. variables in perl

[Ratzie]

I hava script that runs with out a hitch from command line but as soon as a cron it, it hangs.

In the script it source environment files, but I am tending to lean towards it may not.
...
# Set up environment for the bins/sqlplus
system('. /etc/access/db/oraenv');
system('. /home/admin/.db_env');
...

Now in the same crontab the only way it will work is by adding the env in the cron. Is there a better way?

00 05 * * 2-6 (. /etc/accesss/db/oraenv;. /home/admin/.db_env; /home/admin/scripts/sysadmin/acxld/acxld.pl -C) > /dev/null 2>&1

[A. Clay Stephenson · Accepted solution]

$ENV{MYVAR1}="xxx";
$ENV{MYVAR2}="yyy";
system("env"};

Note that the "env" command now displays the 2 new env. vars for you. ENV is a hash in Perl.

[Fred Ruffet]

from "perldoc -f keys" :

Here is yet another way to print your environment:

@keys = keys %ENV;
@values = values %ENV;
while (@keys) {
print pop(@keys), '=', pop(@values), "\n";
}

Regards,

Fred

[Hein van den Heuvel]

and:

perl -e 'foreach $k(sort keys %ENV) { print "$k=$ENV{$k}\n" }'

Hein.

[Ratzie]

Thanks