"Fossies" - the Fresh Open Source Software Archive

Member "mod_perl-2.0.11/t/filter/out_str_req_mix.t" (5 Oct 2019, 632 Bytes) of package /linux/www/apache_httpd_modules/mod_perl-2.0.11.tar.gz:


As a special service "Fossies" has tried to format the requested text file into HTML format (style: standard) with prefixed line numbers. Alternatively you can here view or download the uninterpreted source code file. See also the last Fossies "Diffs" side-by-side code changes report for "out_str_req_mix.t": 2.0.8_vs_2.0.9.

    1 # please insert nothing before this line: -*- mode: cperl; cperl-indent-level: 4; cperl-continued-statement-offset: 4; indent-tabs-mode: nil -*-
    2 use strict;
    3 use warnings FATAL => 'all';
    4 
    5 use Apache::Test;
    6 use Apache::TestRequest;
    7 use Apache::TestUtil;
    8 
    9 plan tests => 1, ['include'];
   10 
   11 my $location = '/TestFilter__out_str_req_mix';
   12 
   13 my $content = '<!--#include virtual="/includes/REMOVEclear.shtml" -->';
   14 
   15 my $expected = 'This is a clear text';
   16 my $received = POST_BODY $location, content => $content;
   17 $received =~ s{\r?\n$}{};
   18 
   19 ok t_cmp($expected, $received,
   20     "mixing output httpd and mod_perl filters, while preserving order");