use v5.12;
use warnings;

use Data::Dumper;
use Web::Scraper;
use URI;

# website to scrape
my $urlToScrape = "https://www.finanzen.net/index/dow_jones/werte";

# prepare data
my $names = scraper {
 # we will save the urls
 process ".table.table-small.table-hover > tr > td > a", 'urls[]' => '@href';
 };

# scrape the data
my $res = $names->scrape(URI->new($urlToScrape));
#print Dumper $res;

my @urls;
for my $cur_uri (@{ $res->{urls} }) {
    my $url = $cur_uri->as_string();
    say "Add $url to array.";
    push @urls, $url;
}