[Armsinglom]

Да спасибо, обе регулярки отрабатывают корректно.
Но эта часть скрипта почему то, не отрабатывает.
Вот в этом же скрипте, данная часть отрабатывает корректно:

Код:

unless(`ifconfig` =~ m/inet (10\.[0-9]+\.[0-9]+\.[0-9]+)/) {
  console( COLOR => 'red', MESSAGE => 'Ошибка получения IP адреса' ); }
my $ip_addr = $1;

А вот с этим беда:

Код:

unless (`cat /etc/hosts` =~ m/ ^10\.\d+\.\d+\.\d+(?=\h+\V+?bс[0-9]+)/) {
  console( COLOR => 'red', MESSAGE => 'Ошибка получения IP БС' );}
my $bog1 = $1;

что может быть не так?