• Common.pm

    781 782  
    239 239 #undef <=> FALSE here!!!!
    240 240 if (defined($value)) {
    241 241 if (ref($value) ne 'ARRAY') {
    242 if ($value =~ /^[\d ,]+$/) {
    242 if ($value eq 'none') {
    243 return;
    244 } elsif ($value =~ /^[\d ,]+$/) {
    243 245 $value = [split(/\s*,\s*/, $value)];
    244 246 } else {
    245 247 warn "Contenido Warning: В списке для _generic_int_array_filter есть нечисловые элементы ('$value'). Параметр игнорируется.";