Coś takiego można w 10min napisać..
<div class='codetop'>CODE</div><div class='codemain' style='height:200px;white-space
re;overflow:auto'>#!/usr/bin/perl
#
http://rgawron.megiteam.pl/
use strict;
use LWP::Simple;
die "use: $0 dictionary_path url" if (@ARGV!=2);
my $url = @ARGV[1];
open(DAT, $ARGV[0]) || die("file read");
my @dic = <DAT>;
foreach my $key (@dic){
my $content = get( $url . '/' . $key) ;
print $key if (defined $content);
}
</div>
Utwórz plik z nazwami plików, które chcesz wyszukać, uruchom skrypt:
perl nazwa skryptu sciezka/do/pliku/z/haslami
www.witryna.pl
// BTW kod jestw perlu więc działa i pod linuksem i pod windą