use
strict;
use
warnings;
use
Test::More;
XML::XSP
}
;
use
FindBin;
use
Plack::Test;
use
Plack::Builder;
my
$handler
= builder {
enable
"Magpie"
,
pipeline
=> [
'Magpie::Transformer::XSP'
];
enable
"Static"
,
path
=>
qr!\.xsp$!
,
root
=>
'./t/htdocs'
;
};
test_psgi
app
=>
$handler
,
client
=>
sub
{
my
$cb
=
shift
;
my
$body
=
$res
->content;
like
$body
,
qr/test="655321"/
;
like
$body
,
qr/test="droogie_655321"/
;
like
$body
,
qr/test="6553210"/
;
like
$body
,
qr/test="123556-655321"/
;
like
$body
,
qr/test="bar"/
;
};
done_testing;