Select Code to Download

 $this->{START_CMD} = "$this->{R_BIN} --slave --vanilla" ;

  sub send { 
    my $CLASS_HPLOO ;
...

    return $status ;
  }

  sub read { 
    my $CLASS_HPLOO ;
...
    return @lines if wantarray ;
    return join("\n", @lines) ;
  }