GenHASH - Gerador de hashes SHA1, MD5 e Base64 em Perl
Publicado por Perfil removido (última atualização em 21/05/2013)
[ Hits: 6.112 ]
Script básico em Perl que gera hashes em MD5, SHA1 e Base64.
#!/usr/bin/perl # GenHASH # HASH Generate Tool (SHA1 Base64 and MD5) # By @Kouback_TR_ # www.koubacktr.com use Digest::MD5 qw(md5_hex); use MIME::Base64; use Digest::SHA1 qw(sha1_hex); print <<EOTEXT; ====================================================================== ..|'''.| '||' '||' | .|'''.| '||' '||' .|' ' .... .. ... || || ||| ||.. ' || || || .... .|...|| || || ||''''|| | || ''|||. ||''''|| '|. || || || || || || .''''|. . '|| || || ''|...'| '|...' .||. ||. .||. .||. .|. .||. |'....|' .||. .||.es www.koubacktr.com - www.twitter.com/kouback_tr_ V 1.0 ====================================================================== EOTEXT print "Enter caracteres and/or numbers\n"; $var=<STDIN>; chomp($var); $md5=md5_hex("$var"); $base64=encode_base64("$var"); $sha1=sha1_hex("$var"); print "[MD5] |$var => $md5\n"; print "[Base64]|$var => $base64"; print "[SHA1] |$var => $sha1\n"; __END__
Conexão com Banco de Dados Postgres
Validador de cartão de débido e crédito em Perl
Nenhum comentário foi encontrado.
Instalar e Configurar o Slackware Linux em 2025
Como configurar os repositórios do apt no Debian 12 em 2025
Passkeys: A Evolução da Autenticação Digital
Instalação de distro Linux em computadores, netbooks, etc, em rede com o Clonezilla
Configurando o Conky para iniciar corretamente no sistema
3 configurações básicas que podem melhorar muito a sua edição pelo editor nano
Como colorir os logs do terminal com ccze
Instalação Microsoft Edge no Linux Mint 22
Como configurar posicionamento e movimento de janelas no Lubuntu (Openbox) com atalhos de teclado