Perl - WWW :: Mechanize :: Firefox - Открыть ссылку в новой вкладке

Question

Используя метод $mech->find_all_links_dom, я получаю массив ссылок на странице. Для каждого $link в массиве я хочу открыть его на новой вкладке. Я не могу понять, как это сделать, и совет будет замечательным.

Answer 1

Это один способ работы:

#!/usr/bin/perl -w 
use strict; 
use WWW::Mechanize::Firefox; 

my @array = <DATA>; 

foreach (@array) 
{ 
    my $mech = WWW::Mechanize::Firefox->new( 
         activate => 1, # bring the tab to the foreground 
         autoclose => 0 # to prevent autoclosing of the Tab 
         ); 
    $mech->get($_); 
} 

__DATA__ 
www.google.com 
www.yahoo.com 

AFAIK, WWW::Mechanize::Firefox открывает страницу в той же вкладке для данного объекта ($mech). Итак, я запускаю foreach loop и создаю новый объект для каждой ссылки. Это может быть не ЛУЧШИЙ подход, но это работает.