# $Id: ngplus.t 11501 2006-02-10 18:27:13Z particle $

use strict;
use FindBin;
use lib "$FindBin::Bin/../../lib";

use Parrot::Test::Regex;
use Regex;
use Regex::Driver;
use Test::More;

# test 'plus' quantifier, non greedy

Parrot::Test::Regex::run_spec( \*DATA );

__END__
a+?
INPUT:
x
OUTPUT:
Match failed
INPUT:
a
OUTPUT:
Match found
0: 0..0
INPUT:
aaaaax
OUTPUT:
Match found
0: 0..0
INPUT:
aaaaa
OUTPUT:
Match found
0: 0..0
INPUT:
yaaaaaay!!!
OUTPUT:
Match found
0: 1..1
