#!/usr/bin/perl
use utf8;
use strict;
use warnings FATAL => 'all';
use WWW::Mechanize qw();
my $mech = WWW::Mechanize->new;
$mech->credentials('user' => 'password');
$mech->get('http://www.rambler.ru/');
my ($Кремль) = $mech->content =~ /(Кремль)/i;
You very likely want to use Web::Query to dissect your HTML instead of regex, or at least match against the HTML-stripped text version of the document. In reply to Re: RegEx: Detecting the certain cyrillic words
by daxim
in thread RegEx: Detecting the certain cyrillic words
by programmer.perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |