Citadel is a replacement for dos-deflate (ddos.sh) implemented in Perl.