#!/usr/bin/perl -w

use LWP::Simple;

$news_page = get 'http://nyheter.idg.se';

while ($news_page =~ /(.*Explorer.*)/g) {
  print "Nyckelord Explorer hittat\n$1\n\n";
}