Yet Another CPAN Grep

BrowserStack-Local ( B/BS/BSTACK/BrowserStack-Local-1.0.0.tar.gz, BSTACK, 2016; MetaCPAN )

BrowserStack-Local/lib/BrowserStack/Local.pm ( view source; MetaCPAN )

emp;
use Config;
use Cwd;
use File::Temp qw(tempdir);
use File::Path qw(make_path);
use JSON::Parse qw(parse_json);

require Exporter;

our @ISA = qw(Exporter);

our %EXPORT_TAGS = ( 'all' => [ qw(

pcode} = "start";
  my $command = $self->command();
  
  my $out = `$command`;
  my $data = parse_json ($out);

  if ($data->{state} != "connected"){
    die $data->{message}->{message};
  }
  else {

BrowserStack-Local ( B/BS/BSTACK/BrowserStack-Local-1.0.0.tar.gz, BSTACK, 2016; MetaCPAN )

BrowserStack-Local/blib/lib/BrowserStack/Local.pm ( view source; MetaCPAN )

emp;
use Config;
use Cwd;
use File::Temp qw(tempdir);
use File::Path qw(make_path);
use JSON::Parse qw(parse_json);

require Exporter;

our @ISA = qw(Exporter);

our %EXPORT_TAGS = ( 'all' => [ qw(

pcode} = "start";
  my $command = $self->command();
  
  my $out = `$command`;
  my $data = parse_json ($out);

  if ($data->{state} != "connected"){
    die $data->{message}->{message};
  }
  else {