Archivos de Categoría: Perl

Encode y decode en Base64 desde Perl

Para mayor claridad aquí dejo un pequeño script que hace uso de las funciones encode y decode de perl #!/usr/bin/perl -w use strict; use warnings; use MIME::Base64; my $no_base64 = 'hola soy una cadena de texto'; my $si_base64 = encode_base64('hola soy una cadena de texto'); chomp ($no_base64); chomp ($si_base64); print "\n\n"; print "cadena no base64:…
Leer más