The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Text::Placeholder::Group::SQL::Statement - construct preparable SQL statements

SYNOPSIS

        use Text::Placeholder;
        my $placeholder = Text::Placeholder->new(
                my $sql_statement = '::SQL::Statement');
        $sql_statement->placeholder_re('some_name');
        $placeholder->compile('DELETE FROM table WHERE field = [=some_name=]');

        print ${$placeholder->execute()}, "<-\n";
        print join(', ', @{$sql_statement->fields});

DESCRIPTION

Provides placeholders based on a configurable RE. All placeholders matching the RE are substituted by question marks. A list of matches can be obtained.

METHOD REFERENCE (API)

subject($row)

Sets or gets the retrieved row.

fields

Gets the captured placeholder parts.

placeholder_re

The regular expression for matching placeholders.

KNOWN BUGS AND LIMITATIONS

This is the first public release.

AUTHOR

Winfried Trumper <pub+perl(a)wt.tuxomania.net>

COPYRIGHT AND LICENSE

Copyright (C) 2011 Winfried Trumper

This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.