#!/usr/bin/perl
use Test::More tests => 2;
use_ok("Text::Ngrams");
require 't/auxfunctions.pl';
my $ng = Text::Ngrams->new(type=>'byte');
$ng->process_text(
' The brown quick fox,
brown fox,
brown fox ...
');
#putfile('t/04.out', normalize($ng->to_string('orderby' => 'ngram' )));
isn('t/04.out', $ng->to_string('orderby' => 'ngram' ));