A função " diff" Perl é usado para determinar a diferença entre dois arquivos . Você abre os arquivos e atribuir o conteúdo do arquivo para uma string. Você pode então executar a função "diff " em ambas as cordas. Ambos os arquivos são avaliadas, e que a diferença é devolvida a uma terceira variável que você usa para imprimir os resultados para o navegador do usuário. Instruções
1
botão direito do mouse o arquivo Perl que você deseja usar para executar o comando diff . Clique em " Abrir com " e selecione o seu editor preferido Perl .
2
Abra ambos os arquivos que você deseja comparar . O código a seguir abre file1.txt e arquivo2.txt :
abrir FILE1 , "> ", " file1.txt " aberto FILE2 , "> ", " arquivo2.txt "
3
Atribuir uma string para o conteúdo de cada um dos arquivos . O código a seguir atribui a cada um dos arquivos abertos para a sua própria seqüência associada :
$ CONT1 = leitura FILE1 ; $ cont2 = leitura FILE2 ;
4
Compare as duas conteúdo do arquivo, e retornar os resultados de uma terceira variável . O código a seguir executa a função de comparação :
meu $ diff = Cadeia :: Diff :: diff ( $ CONT1 , $ cont2 );
5
Imprimir os resultados para o browser do usuário . O código a seguir mostra a diferença entre os dois arquivos :
print $ diff ;