my $mech = WWW::Mechanize::Firefox->new(
      activate => 1,
 );
$mech->get('https://managemymarket.com/managers/acReporting/SalesForMarket.aspx?id=2');

$mech->select("#marketID", '1740');
$mech->field("#startDate", '4/1/2015');  
$mech->field("#endDate", $date);   
$mech->click({ selector => '#btnRun' });

my ($window,$type) = $mech->eval('window');
$window->scrollByLines(188);