имеем ОС Ubuntu 16.04 и perl v5.22.1
проблема
не стартует сервис, завершается с ошибкой
\C is deprecated in regex; marked by <-- HERE in m/\C <-- HERE / at /usr/share/webgui/lib/WebGUI/Asset/Wobject/Poll.pm line 243.

вот строки с 243
243 if ($self->get('a'.$i) =~ /\C/) {
244            $answers .= $self->getValue("a".$i)."\n";
245        }

хотя на perldoc.perl.org пишут
The /\C/ regular expression character class is deprecated. From perl 5.22 onwards it will generate a warning, and from perl 5.24 onwards it will be a regular expression compiler error. If you need to examine the individual bytes that make up a UTF8-encoded character, then use utf8::encode() on the string (or a copy) first.
т.е. должно быть только предупреждение

нашел такой пример
+# XXX FIXME escape_char is buggy as it assigns meaning to the string's storage format.
sub escape_char {
-    return join '', @URI::Escape::escapes{$_[0] =~ /(\C)/g};
+    if (utf8::is_utf8($_[0])) {
+        my $s = $_[0];
+        utf8::encode($s);
+        unshift(@_, $s);
+    }
+
+    return join '', @URI::Escape::escapes{$_[0] =~ /(.)/sg};
}

кто может предложить как заменить регулярное выражение в строке 243