Logo

Programming-Idioms

This language bar is your friend. Select your favorite languages!
  • Perl

Idiom #234 Encode bytes to base64

Assign to the string s the standard base64 encoding of the byte array data, as specified by RFC 4648.

use MIME::Base64;
$encoded = encode_base64('Aladdin:open sesame');
$decoded = decode_base64($encoded);

perl has strings, not byte arrays, so we use the MIME::Base64 CPAN module to encode or decode strings to base 64. If the bytes were in an array (i.e. a perl list) then we could just concatenate them beforehand into a string using join '', @list.
using System;
string s = Convert.ToBase64String(data);
New implementation...
< > ⌨
programming-idioms.org 
$encoded = encode_base64('Aladdin:open sesame');
$decoded = decode_base64($encoded);

string s = Convert.ToBase64String(data);
var s = base64.encode(data);
s := base64.StdEncoding.EncodeToString(data)
final s = data.encodeBase64().toString()
let s = btoa(data);
byte data[] = s.getBytes();
String s = getEncoder().encodeToString(data);
s := EncodeStringBase64(data);
b = base64.b64encode(data)
s = b.decode()
s = Base64.strict_encode64(data)
let s = base64::encode(data);
(base64-encode
 (list->bytes
  (map char->integer
       (string->list "hi there"))))
Dim s As String = Convert.ToBase64String(data)