$ ./2.dom.pl ./2.dom.pl ads_tarnhelm ads_doWithAds ads_monitoring_setup ads_safeframe_setup ads_general_setup IMDbHomepageSiteReactViews imdbHeader nblogin imdbHeader-navDrawerOpen imdbHeader-navDrawerOpen--desktop imdbHeader-navDrawer nav-link-categories-mov nav-link-categories-tvshows nav-link-categories-video nav-link-categories-awards nav-link-categories-celebs nav-link-categories-comm home_img_holder home_img navSearch-searchState suggestion-search-container nav-search-form navbar-search-category-select navbar-search-category-select-contents suggestion-search suggestion-search-button imdbHeader-searchClose imdbHeader-searchOpen ipc-svg-gradient-tv-logo-t ipc-svg-gradient-tv-logo-v ipc-wrap-background-id inline20_wrapper placeholderPattern b a b a b a b a b a b a b a inline40_wrapper placeholderPattern from-your-watchlist fan-picks teconsent ftr__a ftr__c ftr__e ftr__g ftr__i ftr__k ftr__m ftr__o ftr__q ftr__s ftr__u ftr__w ftr__y ftr__A ftr__C ftr__E ftr__G ftr__b ftr__d ftr__f ftr__h ftr__j ftr__l ftr__n ftr__p ftr__r ftr__t ftr__v ftr__x ftr__z ftr__B ftr__D ftr__F ftr__H ipc-svg-gradient-tv-logo-t ipc-svg-gradient-tv-logo-v ipc-svg-gradient-tv-logo-t ipc-svg-gradient-tv-logo-v be $ cat 2.dom.pl #!/usr/bin/perl use strict; use warnings; use Log::Log4perl; use 5.016; use Mojo::DOM; use Mojo::UserAgent; my $log_conf3 = "/home/hogan/Documents/hogan/logs/conf_files/3.conf"; my $log_conf4 = "/home/hogan/Documents/hogan/logs/conf_files/4.conf"; #Log::Log4perl::init($log_conf3); #debug Log::Log4perl::init($log_conf4); #info my $logger = Log::Log4perl->get_logger(); $logger->info("$0"); # represent $0 as browser to server my $uaname = 'Mozilla/5.0 (Windows NT 6.1; WOW64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.93 Safari/537.36'; my $ua = Mojo::UserAgent->new; $ua->max_redirects(5)->connect_timeout(20)->request_timeout(20); $ua->transactor->name($uaname); ## main page of imdb contains search box my $imdburl = "http://www.imdb.com/"; ## example from https://docs.mojolicious.org/Mojo/DOM my $dom = $ua->get($imdburl)->res->dom; # say "$dom"; works # my @ids= $dom->find('[id]')->map(attr => 'id')->each; $logger->info("@ids"); __END__ $