#!perl
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
;