Browsing the archives for the wordlist tag.

hexspeak

Açık Kaynak, Programlama, ytulinux

http://en.wikipedia.org/wiki/Hexspeak

use strict;
open(HANDLE,”wordlist.txt”) || die “wrong path buddy”;
my @wordlist = <HANDLE>;
@wordlist = grep /^[A-F]+$/, @wordlist;
@wordlist = sort { length $b cmp length $a } @wordlist;
print @wordlist[0..30];
ACCEDED
DEFACED

Bu yazı toplamda 2302, bugün ise 2 kez görüntülenmiş

No Comments