Del

Текст этого сообщения доступен только зарегистрированным пользователям.

Последний раз редактировалось: arma (06/08/15 в 18:24), всего редактировалось 1 раз

вариант 1 - апгрейд перла до новой версии
вариант 2 - выкинуть строку use 5.010; - и вроде должно работать, т.к. особых специфических плюшек версий 5.10+ кажется нет.

Вариант 1 не подходит,

вариант 2 не походит тоже, строку комментировал конечно.
Там, даже после замены конструции given/when/default (не поддерживается в 5.8.8) не работают то ли регекспы в таком виде, то ли еще что-то, узнать не смог, потому как не силен.

P.S Когда мой заказ (PHP) закончишь?

arma: а чо хоть какую ошибку то пишет?

arma писал:

P.S Когда мой заказ (PHP) закончишь?

дык его то и делаю

_s_[sov] писал:

arma: а чо хоть какую ошибку то пишет?

Вторую часть скрипта я закомментировал так, чтобы проверить правило поиска по регуляркам:

Код:

#sub get_daylines {     open my $vnstat, "/usr/bin/vnstat --dumpdb |";     my @lines;     while (my $line = <$vnstat>) {         chomp $line;         my $ns = qr/[^:]+/;         next unless $line =~ /^d;(?<day>$ns);(?<time>$ns);(?<rx_mib>$ns);(?<tx_mib>$ns);(?<rx_kib>$ns);(?<tx_kib>$ns);(?<in_use>$ns)$/;         push @lines => { %+ };     } #    return @lines;     print @lines; #}

Получаю такую ошибку:

Код:

Sequence (?<d...) not recognized in regex; marked by <-- HERE in m/^d;(?<d <-- HERE ay>(?-xism:[^:]+));(?<time>(?-xism:[^:]+));(?<rx_mib>(?-xism:[^:]+));(?<tx_mib>(?-xism:[^:]+));(?<rx_kib>(?-xism:[^:]+));(?<tx_kib>(?-xism:[^:]+));(?<in_use>(?-xism:[^:]+))$/ at /etc/munin/plugins/vnstat_month line 93, <$_[...]> line 1.