Cadena :: diff

diff simple a la cadena
Descargar ahora

Cadena :: diff Clasificación y resumen

Anuncio publicitario

  • Rating:
  • Licencia:
  • Perl Artistic License
  • Precio:
  • FREE
  • Nombre del editor:
  • Kazuhiro Osawa
  • Sitio web del editor:
  • http://search.cpan.org/~yappo/

Cadena :: diff Etiquetas


Cadena :: diff Descripción

Cadena :: DIFF es la diferencia de una cadena consecutiva. Después de que se realice la diferencia general, la diferencia en la línea se puede buscar. HSYNOPSIS Use STRING :: DIFF; Use STRING :: DIFF QW (diff_fully Diff Diff_merge Diff_Regexp); # Funciones de exportación # simple diff mi ($ viejo, $ nuevo) = cadena :: diff :: diff ('esto es perl'); esto es ruby ​​'); Imprimir "$ Old \ N"; # Esto es Imprimir "$ New \ N"; # Esto es {Ruby} My $ Diff = String :: Diff :: Diff ('Esto es Perl', 'Esto es ruby '); Imprimir "$ diff -> \ n"; # Esto es Imprimir "$ Diff -> \ n"; # Esto es {Ruby} My $ Diff = String :: Diff :: Diff ( 'Esto es Perl', 'Esto es Ruby', Remove_Open => '', Remove_Close => '', Append_Open => '', append_close => '',); Imprimir "$ diff -> \ n"; # Esta es la impresión de Perl "$ diff -> \ n"; # Este es Ruby # fusionó mi $ Diff = String :: Diff :: diff_merge ('este es Perl ',' Esto es ruby ​​'); Imprimir "$ Diff \ N"; # Esto es {Ruby} My $ Diff = String :: Diff :: Diff_merge ('Esto es Perl', 'Esto es Ruby', Remove_Open => '', REMOVE_CLOSE => '', append_open => '', append_close => '',); Imprimir "$ Diff \ N"; # Esto es perlruby # Cambio a las marcas predeterminadas% cadena :: DIFF :: DEFAULT_MARK_MARKS = (REMORIFICACIÓN_OPEN => '', REMORIFICACIÓN_CROSE => '', append_open => '', append_close => '' , separador => '', # para diff_merge); # GENERADO PARA REGEXP MIS $ DIFF = STRING :: DIFF :: DIFF_REGEXP ('Esto es Perl', 'Esto es Ruby'); Imprimir "$ Diff \ N"; # Esto \ is \ (?: perl | ruby) # lista detallada My $ dif = string :: diff :: diff_ply ('Esto es perl', 'esto es ruby'); Para mi línea $ (@ {{$ DIFF -> }) {imprimir "$ línea -> : '$ línea -> ' \ n"; } # u: 'Esto es' # -: 'perl' para mi línea $ (@ {{$ diff -> }) {imprimir "$ línea -> : '$ línea -> ' \norte"; } # u: 'Esto es' # +: 'Página de inicio de Ruby'product


Cadena :: diff Software relacionado

Sobre nosotros