#!/usr/bin/perl

use MIME::Base64;

{
local $/;
$content = <STDIN>;
}

print encode_base64($content);