| Converter :: em toda a linha Convert :: O retorno é um módulo Perl para converter arquivos de quebra-cabeça binários ao texto. |
Baixe Agora |
Converter :: em toda a linha Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Doug Sparling
- Site do editor:
- http://search.cpan.org/~dsparling/Convert-AcrossLite-0.08/AcrossLite.pm
Converter :: em toda a linha Tag
Converter :: em toda a linha Descrição
Converter :: O retorno é um módulo Perl para converter arquivos de quebra-cabeça binários ao texto. Converter :: O retorno é um módulo Perl para converter arquivos de quebra-cabeça binários em linha para texto.synopsis use converter :: através do outro lado; Meu $ AC = CONVERTE :: CHOTLITE-> NOVO (); $ AC-> In_File ('/ Home / Doug / Quebra-cabeças / Easy.Puz'); $ AC-> Out_File ('/ Home / Doug / Quebra-cabeças / Easy.txt'); $ AC-> PUZ2TEXT; ou usar converter :: através do corpo; Meu $ AC = CONVERTE :: CHOTLITE-> NOVO (); $ AC-> In_File ('/ Home / Doug / Quebra-cabeças / Easy.Puz'); meu texto de $ = $ AC-> PUZ2Text; ou usar converter :: através do corpo; Meu $ AC = CONVERTE :: CHOTLITE-> NOVO (); $ AC-> In_File ('/ Home / Doug / Quebra-cabeças / Easy.Puz'); meu $ AC- PARSE_FILE; Meu título $ = $ AC-> get_title; Meu Author = $ AC-> get_Author; Meu $ APRYRIGHT = $ AC-> get_copyright; meu @Solution = $ Ac-> get_solution; meu @DiaGram = $ AC-> get_diagram; Minhas $ atuais = $ AC-> get_across_clues; minhas $ Down_Cleues = $ AC-> get_down_clues; ou usar converter :: através do corpo; Meu $ AC = CONVERTE :: CHOTLITE-> NOVO (); $ AC-> In_File ('/ Home / Doug / Quebra-cabeças / Easy.Puz'); meu ($ at) hashref, $ Down_hahref) = get_across_down; Meu Ross =% $ Correr_Hashref; foreach minha chave $ (classificar {$ a $ b} keys ross) {print "direção: $ através de {$ Key} {direção} n"; Imprimir "Clue Number: $ através {$ Key} {Clue_number} n"; Imprimir "Fileira: $ através de {$ Key} {Row} N"; Imprimir "Col: $ através {$ Key} {coluna} n"; Imprimir "Clue: $ através de {$ Key} {Clue} N"; Imprimir "Solução: $ através de {$ Key} {Solution} N"; Imprimir "Comprimento: $ através de {$ Key} {comprimento} nn"; } meu% para baixo =% $ down_hashref; foreach minha chave $ (classificar {$ a $ b} keys% para baixo) {print "direção: $ Down {$ Key} {direção} n"; Imprimir "Número da Clue: $ Down {$ Key} {Clue_number} n"; Imprimir "Fileira: $ Down {$ Key} {Row} N"; Imprimir "Col: $ Down {$ Key} {coluna} n"; Imprimir "Clue: $ Down {$ Key} {Clue} N"; Imprimir "Solução: $ Down {$ Key} {Solution} N"; Imprimir "Comprimento: $ Down {$ Key} {comprimento} nn"; } Convert :: O retorno é usado para converter arquivos de quebra-cabeça binários ao texto. Requisitos: · Perl.
Converter :: em toda a linha Software Relacionado