#!/usr/bin/perl -w

use strict;
use warnings;
use 5.012;
use WWW::Mechanize::Chrome;

use Log::Log4perl ':easy';

Log::Log4perl->easy_init($TRACE);

my $mech = WWW::Mechanize::Chrome->new(
    headless => 0,
);

use Data::Dumper;

my $res = $mech->get('https://egp.rutgers.edu/wmc.html');
say Dumper $mech->getResourceTree_future()->get;

$mech->sleep (20);