in reply to decode a file

use MIME::Base64; $decoded = decode_base64($record);