File: failure.t

package info (click to toggle)
liburi-title-perl 1.904-1
  • links: PTS, VCS
  • area: main
  • in suites: bookworm, forky, sid, trixie
  • size: 188 kB
  • sloc: perl: 533; makefile: 6
file content (9 lines) | stat: -rw-r--r-- 200 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
 
#!perl -w
use strict;
use lib qw(lib ../lib);
use Test::More tests => 1;

use URI::Title qw(title);

# it's much easier to test for failure
is(title('nonsense'), undef, "Title of nonsense is blank");