File Coverage

blib/lib/TSQL/Common/Regexp.pm

Criterion	Covered	Total	%
statement	9	29	31.0
branch			n/a
condition			n/a
subroutine	3	23	13.0
pod	20	20	100.0
total	32	72	44.4

package TSQL::Common::Regexp;

use 5.010;
use strict;
use warnings;

=head1 NAME

TSQL::Common::Regexp - Contains regexps common across TSQL::AST and TSQL::SplitStatement

=head1 VERSION

Version 0.05

=cut

our $VERSION = '0.05';


sub qr_id               { return q{(?:[#_\w$@][#$:_.\w]*)} ; } ;
sub qr_label            { return q{(?:[#_\w$@][#$:_.\w]*[:])} ; } ;

sub qr_begintoken       { return q{(?xi:\A \s* (?:\b begin \b) \s* \z ) }                    ; } ;
sub qr_endtoken         { return q{(?xi:\A \s* (?:\b end \b) \s* \z ) }                      ; } ;
sub qr_begintrytoken    { return q{(?xi:\A \s* (?:\b begin \b \s+ \b try \b ) \s* \z ) }     ; } ;
sub qr_endtrytoken      { return q{(?xi:\A \s* (?:\b end \b \s+ \b try \b ) \s*  \z ) }      ; } ;
sub qr_begincatchtoken  { return q{(?xi:\A \s* (?:\b begin \b  \s+ \b catch \b) \s*  \z ) }  ; } ;
sub qr_endcatchtoken    { return q{(?xi:\A \s* (?:\b end \b  \s+ \b catch \b) \s*  \z ) }    ; } ;
sub qr_iftoken          { return q{(?xi:\A \s* (?:\b if \b) ) }                              ; } ;
sub qr_elsetoken        { return q{(?xi:\A \s* (?:\b else \b) ) }                            ; } ;
sub qr_GOtoken          { return q{(?xi:\A \s* (?:\b go \b) ) }                              ; } ;
sub qr_whiletoken       { return q{(?xi:\A \s* (?:\b while \b) ) }                           ; } ;


sub qr_createproceduretoken     { return q{(?xi:\A \s* (?: \b create \s+ proc (?:edure)? \b) ) }   ; } ;
sub qr_alterproceduretoken      { return q{(?xi:\A \s* (?: \b alter  \s+ proc (?:edure)? \b) ) }   ; } ;

sub qr_createtriggertoken       { return q{(?xi:\A \s* (?: \b create \s+ trigger \b) ) }           ; } ;
sub qr_altertriggertoken        { return q{(?xi:\A \s* (?: \b alter  \s+ trigger \b) ) }           ; } ;


sub qr_createviewtoken          { return q{(?xi:\A \s* (?: \b create \s+ view \b) ) }                ; } ;
sub qr_alterviewtoken           { return q{(?xi:\A \s* (?: \b alter  \s+ view \b) ) }                ; } ;


sub qr_createfunctiontoken      { return q{(?xi:\A \s* (?: \b create \s+ function \b) ) }          ; } ;
sub qr_alterfunctiontoken       { return q{(?xi:\A \s* (?: \b alter  \s+ function \b) ) }          ; } ;

1;

__DATA__