Leser: 17
1
2
3
4
5
6
7
8
9
10
11
12
13
14
#!D:/xampp/xampp/perl/bin/perl -w
use strict;
use Data::Dumper;
use LWP::Simple;
my $url = 'http://inrgend/eine/seite/index.php';
my $web_site = get ($url);
my @matches = ($web_site =~ m/ <h2> (.*) <\/div> /g);
print "<html><body>\n";
print Dumper(@matches);
print "</body></html>";