| Algoritmo :: Diff. algoritmo :: diff é um módulo Perl para computar diferenças "inteligentes" entre dois arquivos / listas. |
Baixe Agora |
Algoritmo :: Diff. Classificação e resumo
- Licença:
- Perl Artistic License
- Nome do editor:
- Mark-Jason Dominus
- Site do editor:
- http://search.cpan.org/~tyemq/Algorithm-Diff-1.1902/lib/Algorithm/Diff.pm
Algoritmo :: Diff. Tag
Algoritmo :: Diff. Descrição
Algoritmo :: Diff é um módulo Perl para computar diferenças "inteligentes" entre dois arquivos / listas. Algoritmo :: Diff é um módulo Perl para computar diferenças "inteligentes" entre dois arquivos / listas.synopsis requer algoritmo :: diff; # Este exemplo produz saída tradicional 'diff': meu $ diff = algoritmo :: diff-> new (@ seq1, @ seq2); $ diff-> base (1); # Números de linha de retorno, não índices enquanto ($ diff-> próximo ()) {próximo se $ diff-> same (); meu $ SEP = ''; if (! $ diff-> Itens (2)) {Printf "% d,% dn", $ diff-> get (qw (min1 max1 max2)); } elsif (! $ diff-> Itens (1)) {Printf "% d,% dn", $ diff-> get (qw (max1 min2 max2)); } else {$ set = "--- n"; printf "% d,% d,% dn", $ diff-> get (qw (min1 max1 min2x2)); } Imprimir "<$ _" por $ diff-> Itens (1); Imprimir $ SEP; Imprimir "> $ _" por $ diff-> itens (2); } # Interfaces alternativas: use algoritmo :: diff qw (lcs lcs_length lcsidx diff sdiff compact_diff travesseiro_sequencies travessi_balanced); @lcs = lcs (@ seq1, @ seq2); $ lcsref = lcs (@ seq1, @ seq2); $ contagem = lcs_length (@ seq1, @ seq2); ($ SEQ1IDXREF, $ SEQ2IDXREF) = lcsidx (@ seq1, @ seq2); # Interfaces complicadas: @diffs = diff (@ seq1, @ seq2); @sdiffs = sdiff (@ seq1, @ seq2); @cdiffs = compact_diff (@ seq1, @ seq2); treverse_sequencices (@ seq1, @ seq2, {match => callback1, Descartar_a => Callback2, Descartar_b => Callback3,}, key_generator, @extra_args,); travesse_balanced (@ SEQ1, @ SEQ2, {match => callback1, Descartar_a => Callback2, Descartar_b => Callback3, alterar => Callback4,}, key_generator, @extra_args,); Requisitos: · Perl.
Algoritmo :: Diff. Software Relacionado