11 lines
159 B
Perl
11 lines
159 B
Perl
|
#!/usr/bin/perl
|
||
|
|
use strict;
|
||
|
|
use LWP::Simple;
|
||
|
|
use HTML::Parser;
|
||
|
|
|
||
|
|
my $page = get "https://tetalab.org";
|
||
|
|
|
||
|
|
my $parser = HTML::Parser->new;
|
||
|
|
$parser->parse($page);
|
||
|
|
|