NAME

Scanner - implements the base for all scanners

SYNOPSIS

use Scanner::Scanner;

$tokens = [ '[A-Za-z_][A-Za-z0-9_]*', $IDENT ];

$scanner = new Scanner::FirstMatch($tokens, new
    Scanner::Stream::File "blah.txt");