The Perl Toolchain Summit 2025 Needs You: You can help 🙏 Learn more

#!perl
use strict;
use Test::More tests => 19;
require_ok('Convert::Ascii85');
ok defined &Convert::Ascii85::encode;
ok defined &Convert::Ascii85::decode;
ok !defined &encode;
ok !defined &decode;
ok !defined &ascii85_encode;
ok !defined &ascii85_decode;
use_ok('Convert::Ascii85');
ok !defined &encode;
ok !defined &decode;
ok !defined &ascii85_encode;
ok !defined &ascii85_decode;
use_ok('Convert::Ascii85', qw(ascii85_encode ascii85_decode));
ok !defined &encode;
ok !defined &decode;
ok defined &ascii85_encode;
ok defined &ascii85_decode;
ok \&ascii85_encode == \&Convert::Ascii85::encode;
ok \&ascii85_decode == \&Convert::Ascii85::decode;