[p5sagit/p5-mst-13.2.git] / t / lib / mimeb64u.t

BEGIN {
        chdir 't' if -d 't';
        @INC = '../lib';
}

print "1..1\n";

require MIME::Base64;

eval {
    MIME::Base64::encode(v300);
};

print "not " unless $@;
print "ok 1\n";
Commit	Line	Data
6fba102d	1	BEGIN {
	2	chdir 't' if -d 't';
	3	@INC = '../lib';
	4	}
	5
	6	print "1..1\n";
	7
	8	require MIME::Base64;
	9
	10	eval {
	11	MIME::Base64::encode(v300);
	12	};
	13
	14	print "not " unless $@;
	15	print "ok 1\n";
	16