# -*- cperl -*-
use Test::More tests => 4;
use Text::RewriteRules;

RULES/x first
a b c ==>cba
ENDRULES

is(first("abc"),"cba");
is(first("a b c"), "a b c");


RULES/x second
a
b
c
==>cba
ENDRULES

is(second("abc"),"cba");
is(second("a b c"), "a b c");