mnshome.info
marzenia się spełniają



  Проблема получения attachments при отправке почты по параметрам CTK из конфигурации
20.07.2016 11:21
# Correct attach data
sub _correct_attach {
    my $att = shift || return undef;
    
    if (is_hash($att)) {
        while (my ($k, $v) = each %$att) {
            delete $att->{$k}; $att->{ucfirst($k)} = $v;
        }
    } elsif (is_array($att)) {
        foreach my $n (@$att) {
            next unless $n && ref($n) eq 'HASH';
            while (my ($k, $v) = each %$n) {
                delete $n->{$k}; $n->{ucfirst($k)} = $v;
            }
        }
    } else {
        CTKx->instance->c->warning("Incorrect attach!");
    }
    return 1;
}
  CTK::ConfGenUtil
13.03.2013 13:53

Спецификой модуля CTK::ConfGenUtil является то, что путь поиска ключа МОЖНО и НУЖНО СТАРАТЬСЯ задавать максимально насыщеной формой записи. Это позволит избегать таких ситуаций, как описано в сл. примере.

Форма записи 1:

<Foo aaa>
    <Bar bbb>
        Baz blah-blah-blah
        Qux 123
        Qux 456
        Qux 789
    </Bar>
</Foo>

Форма записи 2:

<Foo aaa>
    <Bar>
        Baz blah-blah-blah
        Qux 123
        Qux 456
        Qux 789
    </Bar>
</Foo>

Форма записи 3:

<Foo>
    <Bar bbb>
        Baz blah-blah-blah
        Qux 123
        Qux 456
        Qux 789
    </Bar>
</Foo>

Форма записи 4:

<Foo>
    <Bar>
        Baz blah-blah-blah
        Qux 123
        Qux 456
        Qux 789
    </Bar>
</Foo>

Форма записи 5:

<Bar>
    Baz blah-blah-blah
    Qux 123
    Qux 456
    Qux 789
</Bar>

Форма записи 6:

<Foo>
    Baz blah-blah-blah
    Qux 123
    Qux 456
    Qux 789
</Foo>

Форма записи 7:

<Foo aaa>
    Baz blah-blah-blah
    Qux 123
    Qux 456
    Qux 789
</Foo>

Форма записи 8:

Baz blah-blah-blah
Qux 123
Qux 456
Qux 789

В любой из этих форм (как ошибочно так и преднамеренно измененные) то отсутствуют имена блоков, то отстутствуют родительские ветви, то и вовсе отсутствуют все ветви за исключением самих значений. Для того чтобы получить, к примеру, значение baz, достаточно создать самый сложный путь который только можно представить. И после этого найденный парметр baz будет получен без каких либо трудностей. Вот пример, такого пути:

    my $baz = value( $config, 'foo/aaa/bar/bbb/baz' );

Во всех формах записи мы получим значение blah-blah-blah

 

THUD XYZZY PLUGH FRED WALDO GARPLY
GRAULT CORGE QUUZ QUX BAZ BAR FOO

День памяти перевода часов на летнее время

0
0
0
days
:
0
0
hrs
:
0
0
min
:
0
0
sec

поиск по дате...
поиск по содержимому...
GGCzat 1.00
Tagi
Artefakty
28.12.2015 13:09:22
MDScore: Marionette.js
06.05.2016 13:07:16
Создать RESTfull обработчик как модуль
01.12.2017 22:56:38
SubProject: static-site
24.06.2017 17:34:47
MNSHOME: Переходить на Centos!
30.10.2017 13:05:21
Создать функционал 2 в 1: mod_perl библиотеку для получения отчета по бэкапам за последние сутки
19.08.2015 11:35:42
Переезд разработчиков на тестовый MySQL сервере
02.03.2016 18:20:19
По вёрстке - loftblog
02.06.2015 13:52:56
С Даши за ECB/VTB24
29.11.2017 18:05:16
Создать простые функции криптования AES256+Blowfish+base64
Tue, 16 Oct 2018 13:09:22 +0400

Linki zewnętrzne

#OPERA
Czytam
GRY
MnshomeInfo
Monitoring
Photo
Przyjaciele
Serwisy
fla-master

IP

Valid XHTML 1.0 Transitional

Valid CSS!


Copyright © 1998-2017 Serż Minus. All rights reserved


do góry