diff --git a/t/pod/pod2usage2.t b/t/pod/pod2usage2.t index 0ed928c..9876347 100644 --- a/t/pod/pod2usage2.t +++ b/t/pod/pod2usage2.t @@ -386,7 +386,7 @@ SKIP: { } # bad regexp syntax -($exit, $text) = getoutput( sub { pod2usage( -verbose => 99, -sections => 'DESCRIPTION{BLAH') } ); +($exit, $text) = getoutput( sub { pod2usage( -verbose => 99, -sections => 'DESCRIPTION[BLAH') } ); like ($text, qr/Bad regular expression/, "Output test pod2usage with bad section regexp"); } # end SKIP