view release on metacpan or  search on metacpan

MANIFEST  view on Meta::CPAN

Changes
Makefile.PL
MANIFEST
README
t/01basic.t
t/02more.t
t/03align.t
t/04show.t
t/05chunk.t
t/06unicode.t
t/07dups.t
t/08group.t
lib/Data/Hexify.pm
META.yml                                 Module meta-data (added by MakeMaker)

t/06unicode.t  view on Meta::CPAN

#!/usr/bin/perl -w

# $Id: 06unicode.t,v 1.1 2004/06/29 14:58:40 jv Exp $

use strict;
use warnings;
use Test::More tests => 7;

BEGIN { use_ok('Data::Hexify'); }

my $data = (chr(400).chr(401).chr(402)) x 80;
is(Hexify(\$data, { length => 48 }),
   <<'EOD', "length");