Paste2 Logo
  1. ;Autore: Red Skull 92
  2. ;Web:http://redskull92.wordpress.com
  3. ;Mail: RedSkull92[AT]gmail[DOT]com
  4.  
  5. #include <array.au3>
  6. #include <file.au3>
  7.  
  8. $file=FileOpenDialog("Scegli il file da controllare",@DesktopDir,"All (*.*)",5)
  9. $grande=_FileCountLines($file)
  10. Dim $array[$grande+1]
  11. For $i=1 To $grande
  12.         $leggo = FileReadLine($file,$i)
  13.         _ArraySearch($array,$leggo,0,0,0,1)
  14.         If @error Then
  15.                 _ArrayInsert($array,$i-1,$leggo&@CRLF)
  16.         EndIf
  17. Next
  18. FileDelete($file)
  19. For $x=1 To $grande
  20.         FileWrite($file,$array[$x-1])
  21. Next

Piccolo Script che permette di controllo se dentro un file ci siano frasi doppione e di rimuoverle (per esempio in un file formato da mail)

Molto utile !