package FFMech; $ENV{'DISPLAY'} = ':0.0'; use X11::GUITest qw/SendKeys FindWindowLike ClickWindow SetEventSendDelay/; use Moose; use Modern::Perl; use MooseX::NonMoose; extends 'WWW::Mechanize::Firefox'; #### sub mySendKeys { my $self = shift; my $arg = shift; &X11::GUITest::SendKeys($arg); }