Skip Menu |

This queue is for tickets about the GRID-Machine CPAN distribution.

Report information
The Basics
Id: 53212
Status: resolved
Priority: 0/
Queue: GRID-Machine

People
Owner: Nobody in particular
Requestors: py.lozachmeur [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.107
Fixed in: (no value)



Subject: Problem with startenv when creating a GRID::Machine object
On: Ubuntu Karmic (i386  2.6.31-16-generic)
With: This is perl, v5.10.0 built for i686-linux


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):

Show quoted text
#!/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 at runtime:
Not an ARRAY reference at /opt/lampp/lib/perl5/site_perl/5.10.0/GRID/Machine.pm line 138.


I have checked this 138 line and it seems to be a problem (have a look on startenv => { qw{ @$startenv } })



Subject: Re: [rt.cpan.org #53212] Problem with startenv when creating a GRID::Machine object
Date: Wed, 30 Dec 2009 13:01:50 +0000
To: bug-GRID-Machine [...] rt.cpan.org
From: Casiano Rodriguez-Leon <casiano [...] ull.es>
Many thanks for pointing the bug. I have uploaded version 0.108 of GRID::Machine, that hopefully will be available soon. The following test, seems to work ok with 0.108: ######################################################################## Test::Exception::lives_ok { $machine = GRID::Machine->new( host => $host, startenv => { ONE => 1, TWO => '2 2', 'THREE FOUR' => 3} ); } 'No fatals creating a GRID::Machine object'; ######################################################################## my $r = $machine->eval( q{ print "$ENV{ONE}\n"; print "$ENV{TWO}\n"; print "$ENV{'THREE FOUR'}\n"; }); like("$r", qr{^1\s2\s2\s3\s$}, "startenv"); ######################################################## Hope it helps Casiano
Subject: Re: [rt.cpan.org #53212] Problem with startenv when creating a GRID::Machine object
Date: Wed, 30 Dec 2009 16:15:48 +0100
To: bug-GRID-Machine [...] rt.cpan.org
From: Pierre-Yves Lozachmeur <py.lozachmeur [...] gmail.com>
It works fine with the today release. Thank you very much! Pierre-Yves LOZACHMEUR On Wed, Dec 30, 2009 at 2:02 PM, casiano@ull.es via RT < bug-GRID-Machine@rt.cpan.org> wrote: Show quoted text
> <URL: https://rt.cpan.org/Ticket/Display.html?id=53212 > > > Many thanks for pointing the bug. > > I have uploaded version 0.108 of GRID::Machine, that hopefully will be > available soon. > The following test, seems to work ok with 0.108: > > ######################################################################## > > Test::Exception::lives_ok { > $machine = GRID::Machine->new( > host => $host, > startenv => { ONE => 1, TWO => '2 2', 'THREE FOUR' => 3} > ); > } 'No fatals creating a GRID::Machine object'; > > ######################################################################## > > my $r = $machine->eval( q{ > print "$ENV{ONE}\n"; > print "$ENV{TWO}\n"; > print "$ENV{'THREE FOUR'}\n"; > }); > > like("$r", qr{^1\s2\s2\s3\s$}, "startenv"); > > ######################################################## > > Hope it helps > > Casiano > >
Changing status to solved then