use strict;
# BEGIN { $DB::single = 1; }
use MIME::Base64;
print encode_base64('foo'), "\n";