File: 08_html_in_output.pl

package info (click to toggle)
libtap-formatter-html-perl 0.11%2Bdfsg-1
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 468 kB
  • ctags: 88
  • sloc: perl: 744; sh: 51; makefile: 2
file content (9 lines) | stat: -rw-r--r-- 260 bytes parent folder | download | duplicates (6) 
1
2
3
4
5
6
7
8
9
 
use strict;
use warnings;

use Test::More 'no_plan';

ok(1, 'escape some of these chars: !@#$%^++_)(*&^%$#@!><');
like('a<b>c', qr/<b>/, 'contains <b> in the <output>');
is('a<b>c', '<html><body><h1>eeek</h1></body></html>', '<html> in the diag messages..');