Gravata :: CFG. gravatas arquivos simples configuração (.ini) para hashes. Manipula matrizes e seções recorrentes
Baixe Agora

Gravata :: CFG. Classificação e resumo

Gravata :: CFG. Tag

Módulo Perl. ini configuração amarrar configurações INI configurações de empate

Gravata :: CFG. Descrição

Laços arquivos de configuração simples (ini) para hashes. Alças matrizes e secções recorrentes Tie :: Cfg é um módulo Perl que lê em um arquivo de configuração em 'laço' e escreve-lo em 'untie'.You pode usar o arquivo de bloqueio para impedir que outras pessoas acessem o arquivo de configuração, mas isso só deve ser usado se o arquivo de configuração é usado como um arquivo de dados pequeno para conter algumas entradas que podem ser simultaneamente acessados. Observação! Neste caso, um arquivo persistente ".lock" será created.Mode é usado para definir as permissões de acesso; o padrão é 0640. É só definir se um arquivo deve ser escrito (ou seja, utilizando a palavra-chave WRITE) .INIMODE permite escolher entre os arquivos de configuração .ini tanto Windows e simples chave files.Sections valor entried são abordados usando um hash dentro um hash: Para um g amarrado a atribuição: $ cfg { "seção"} { "chave"} = "valor" vai escrever no arquivo de configuração: tecla = valueKeys esse fim em + ] será interpretado como matrizes e vai aparecer no hash amarrado como um elemento de matriz. Por exemplo: var = 1 var = 2 var = 3will mostram-se em um g de hash amarrado como: para (0..2) {print $ CFG { "array- seção "} {" var "} ," \ n "; } hashes de hashes são permitidas: $ cfg { "chave"} { "subchave"} { "subsubkey"} { "subsubsubkey"} { "par"} = "valor"; vai aparecer no arquivo de configuração como: utilização nominal = valueSYNOPSIS Tie :: Conf; ### Amostra 1 empate my% conf, 'Tie :: Cfg', LEIA => "/etc/connect.cfg", escreva => "/etc/connect.cfg", MODE => 0600, BLOQUEIO => 1 ; $ Conf {teste} = "Este é um teste"; % Conf desatar; ### Amostra 2 my $ limit = "10000k"; amarrar meus% arquivos, 'Tie :: Cfg', LEIA => "encontrar $ -printf dirs -xdev -type f -size + $ limit \" % h /% f:% k \ n \ "|", a SEP => ':'; if (existe $ files { "/ etc / passwd"}) {print "Você tem um arquivo / etc / passwd! \ n"; } While (($ file, $ size) = cada newdb%) {print "Uau Outro arquivo maior do que $ limit ($ size)! \ N"; } Arquivos desate%; ### Amostra 3 empate meu g, 'Tie :: Cfg', LEIA => "config.cfg", escreva => "config.cfg", a SEP => ':', comment => '#'; my $ counter = $ cfg { "contra"}; $ Marcador + = 1; $ Cfg { "counter"} = $ balcão; $ Cfg { "contra"} + = 1; g desatar; ### Ler e escrever um arquivo INI amarrar meus% ini, 'Tie :: Cfg', LEIA => "config.ini", escreva => "config.ini"; my $ counter = $ ini { "section1" | { "counter1"}; $ Marcador + = 1; $ Ini { "section1"} { "counter1"} = $ balcão; % ini Untie; ### arquivo INI com subseções amarrar meus% ini, 'Tie :: Cfg', LEIA => "config.ini"; my $ counter = $ ini { "section1"} { "counter1"}; $ Marcador + = 1; $ Ini { "section1"} { "counter1"} = $ balcão; $ Ini { "section1"} { "Subsecção 1"} { "parâmetro"} = "valor"; minha @array; for (1..10) {@array empurrão, $ _; } $ Ini { "section1"} { "array"} { "a"} = @ array; % ini Untie; ### opção CHANGE amarrar meus% caminhos, 'Tie :: Cfg', LEIA => "paths.ini", CHANGE => ; # Faça algo aqui% caminhos desate; Requisitos: · Perl. Limitações: · Esta versão breaks versões anteriores como o modo padrão é o modo 'ini'.

Gravata :: CFG. Software Relacionado