use EventRepository;
my $er = EventRepository->new(launch => 'firefox', activate => 1);
$er->get('http://google.com');
####
use Moose;
extends 'FFMech';
sub get {
my ($self, $url) = @_;
$self->SUPER::get($url, synchronize => 0);
}
####
$ENV{'DISPLAY'} = ':0.0'; #allows script to run when called from remote terminal window
use X11::GUITest qw/SendKeys FindWindowLike ClickWindow SetEventSendDelay/;
use Moose;
use MooseX::NonMoose;
extends 'WWW::Mechanize::Firefox';
has 'window_id' => (
is => 'rw',
isa => 'Int',
);
sub BUILD {
my $self = shift;
$self->window_id(FindWindowLike('Mozilla Firefox'));
ClickWindow($self->window_id);
}