Converta:: el AcrossLite es un módulo Perl para convertir archivos de rompecabezas de AcrossLite binarios al texto.

SINOPSIS

el uso Converte:: AcrossLite;

mi $ac = Converte:: AcrossLite-> nuevo ();
$ac-> in_file (/home/doug/puzzles/Easy.puz);
$ac-> out_file (/home/doug/puzzles/Easy.txt);
$ac-> puz2text;

o


el uso Converte:: AcrossLite;

mi $ac = Converte:: AcrossLite-> nuevo ();
$ac-> in_file (/home/doug/puzzles/Easy.puz);
mi $text = $ac-> puz2text;

o


el uso Converte:: AcrossLite;

mi $ac = Converte:: AcrossLite-> nuevo ();
$ac-> in_file (/home/doug/puzzles/Easy.puz);
mi $ac-> parse_file;
mi $title = $ac-> get_title;
mi $author = $ac-> get_author;
mi $copyright = $ac-> get_copyright;
mi @solution = $ac-> get_solution;
mi @diagram = $ac-> get_diagram;
mi $across_clues = $ac-> get_across_clues;
mi $down_clues = $ac-> get_down_clues;

o


el uso Converte:: AcrossLite;

mi $ac = Converte:: AcrossLite-> nuevo ();
$ac-> in_file (/home/doug/puzzles/Easy.puz);

mi ($across_hashref, $down_hashref) = get_across_down;

mi %across = $across_hashref de %;
el foreach mi $key (clasifican {el $a <=> $b} teclas %across) {
imprima "la Dirección: $across {$key} {dirección} n";
imprima "el Número de Pista: $across {$key} {clue_number} n";
imprima "la Fila: $across {$key} {fila} n";
imprima "Cnel: $across {$key} {columna} n";
imprima "la Pista: $across {$key} {pista} n";
imprima "la Solución: $across {$key} {solución} n";
imprima "la Longitud: $across {$key} {longitud} nn";
}

mi %down = $down_hashref de %;
el foreach mi $key (clasifican {el $a <=> $b} teclas %down) {
imprima "la Dirección: $down {$key} {dirección} n";
imprima "el Número de Pista: $down {$key} {clue_number} n";
imprima "la Fila: $down {$key} {fila} n";
imprima "Cnel: $down {$key} {columna} n";
imprima "la Pista: $down {$key} {pista} n";
imprima "la Solución: $down {$key} {solución} n";
imprima "la Longitud: $down {$key} {longitud} nn";
}

Converta:: el AcrossLite es usado para convertir archivos de rompecabezas de AcrossLite binarios al texto.