Help for this page
line: FOO BAR /$/ FOO: "foo" BAR: "bar"
if (defined (my $ret = $p->line($test))) {
no match: 'foo' no match: 'foo ' ... no match: 'fog' no match: 'barfoo' no match: 'bar foo'