Posted on 2009-12-29 16:36:44-08 by pylozachmeur
Problem with startenv when creating a GRID::Machine object
Hi everybody,

I am trying to create a GRID::Machine object with the 'startenv' option set (according to the documentation, its value has to be an hashtable reference):
#!/opt/lampp/bin/perl -w use Sys::Hostname; use GRID::Machine; my %env_hashtable_BIS = ('ORACLE_BASE' => '/u01/app/oracle','ORACLE_HOME' => '/u01/app/oracle/produ +ct/tools/'); my $m = GRID::Machine->new( 'host' => 'oracle@sad01', 'uses' => [qw(Sys::Hostname)], 'startenv' +=> \%env_hashtable_BIS);


Result (runtime): Not an ARRAY reference at /opt/lampp/lib/perl5/site_perl/5.10.0/GRID/Machine.pm line 138.



When I go to the line 138 to check it:
#line 1 "$host" package GRID::Machine; use strict; use warnings; $USES $REMOTE_LIBRARY my \$rperl = $class->new( host => '$host', log => '$log', err => '$err', logic_id => '$logic_id', clientpid => $$, startdir => '$startdir', startenv => { qw{ @$startenv } }, pushinc => [ qw{ @$pushinc } ], unshiftinc => [ qw{ @$unshiftinc } ], sendstdout => $sendstdout, cleanup => $cleanup, prefix => '$prefix', # Where to install modules debug => $portdebug, );


It seems to be a problem with the instruction "startenv => { qw{ @$startenv } }" in the original code.

I am also going to open a bug track but if anybody has any idea... I have been looking for a solution for a while now...


Thanks in advance.
Direct Responses: 12042 | Write a response
Perl Weekly newsletter
A free weekly newsletter for people who are busy to read all the blogs. click here to check it out.