GenHASH - Gerador de hashes SHA1, MD5 e Base64 em Perl
Publicado por Perfil removido (última atualização em 21/05/2013)
[ Hits: 5.830 ]
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__
Validador de cartão de débido e crédito em Perl
Streaming Kiss FM (SP 102,1) Player em perl com interface grafica (Tk)
Orientação a Objetos - Criando e usando uma classe em Perl
Conexão com Banco de Dados Postgres
Nenhum comentário foi encontrado.
Atualizar o macOS no Mac - Opencore Legacy Patcher
Crie alias para as tarefas que possuam longas linhas de comando - bash e zsh
Criando um gateway de internet com o Debian
Configuração básica do Conky para mostrar informações sobre a sua máquina no Desktop
Aprenda a criar músicas com Inteligência Artificial usando Suno AI
Como instalar o navegador TOR no seu Linux
Instalando Zoom Client no Ubuntu 24.04 LTS
Instalando Zoom Client no Fedora 40
Instalando Navegador Firefox no Debian 12
Bloqueando propagandas no Youtube e outros sites com o uBlocker Origin
Dificuldade em ler binário (16)
Configurar Crontab [RESOLVIDO] (6)