#!/usr/bin/perl
#...miscellaneous code here...
require MIME::Base64;
$x = encode_base64('abc');