#!usr/bin/perl

use strict;
use LWP::Simple;

open(FIL,">spars.txt");

my $url='http://mariel.ru/index.html';
my $content=get $url;

my $pervzagal=$content;
my $pervtext=$content;
$pervzagal=~/<font style="font-size: 12pt; font-family:Arial; color:#335DA3; text-decoration: none "><b>(.*)<\/b><\/font>/g;
print FIL $1;
$pervtext=~/<div style="margin-top: 8px; margin-bottom: 2px">(.*)&nbsp;<a href=Article1579.html style="font-size: 8pt; font-weight: normal; font-family:Arial; color:#335da3; text-decoration: underline ">/g;
print FIL $2;

не получается спарсить pervtext , в чем ошибка ?