The table containing the rapt output has an 'undefined' as its 1st element when
there is an error....
DB<9> n
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:455):
455: if ($pid) {
DB<9>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:459):
459: while ($line = <SYSTEM>) {
DB<9>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:460):
460: chomp $line;
DB<9>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:461):
461: push @captured_output, $line;
DB<9>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:462):
462: if ($line =~ /^ERROR/ || $line =~ /^E:/) {
DB<9> p $line
ERROR during RAPT execution
DB<10> n
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:464):
464: $errors ++;
DB<10>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:466):
466: $rr = $self->progress_handler($line);
DB<10>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:467):
467: $retval = 1 if ($rr);
DB<10>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:468):
468: if ($callback) {
DB<10>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:472):
472: close (SYSTEM) || print STDERR "ERROR during execution
$?\n";
DB<10>
ERROR during execution 3328
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:473):
473: my $err = $?;
DB<10>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:474):
474: if ($retval == 0) {
DB<10> p $err
3328
DB<11> n
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:475):
475: $retval = $err;
DB<11>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:525):
525: if ($retval == 0 && $errors > 0) {
DB<11>
PackMan::do_simple_command(/usr/share/perl5/OSCAR/PackMan.pm:528):
528: return ($retval, @captured_output);
DB<11> p Dumper(@captured_output)
$VAR1 = undef;
$VAR2 = 'ERROR during RAPT execution';
DB<12> n
PackMan::smart_install(/usr/share/perl5/OSCAR/PackMan.pm:652):
652: if (defined ($err) && $err) {
DB<12> p $err
3328
DB<13> n
PackMan::smart_install(/usr/share/perl5/OSCAR/PackMan.pm:653):
653: if (scalar (@output) == 0) {
DB<13> p Dumper(@output)
$VAR1 = undef;
$VAR2 = 'ERROR during RAPT execution';
DB<14> n
PackMan::smart_install(/usr/share/perl5/OSCAR/PackMan.pm:656):
656: return (ERROR, join("\n", @output));
DB<14> n
Use of uninitialized value $output[0] in join or string at
/usr/share/perl5/OSCAR/PackMan.pm line 656.
at /usr/share/perl5/OSCAR/PackMan.pm line 656
PackMan::smart_install('PackMan::DEB=HASH(0x2db0680)',
'opkg-c3-server') called at /usr/bin/packman line 148
main::(/usr/bin/packman:149): if ($rc == ERROR) {
Regards,
Olivier.
--
Olivier LAHAYE
CEA DRT/LIST/DCSI/DIR
------------------------------------------------------------------------------
This SF.net email is sponsored by Windows:
Build for Windows Store.
http://p.sf.net/sfu/windows-dev2dev
_______________________________________________
Oscar-devel mailing list
Oscar-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oscar-devel