1 package DBIx::Class::Storage::DBI::MSSQL;
6 use base qw/DBIx::Class::Storage::DBI::Sybase/;
9 my( $id ) = $_[0]->_dbh->selectrow_array('SELECT @@IDENTITY' );
13 sub build_datetime_parser {
15 my $type = "DateTime::Format::Strptime";
17 $self->throw_exception("Couldn't load ${type}: $@") if $@;
18 return $type->new( pattern => '%m/%d/%Y %H:%M:%S' );
25 DBIx::Class::Storage::DBI::MSSQL - Storage::DBI subclass for MSSQL
29 This subclass supports MSSQL. As MSSQL is usually used via a
30 differently-named DBD such as L<DBD::Sybase>, it does not get
31 autodetected by DBD-type like the other drivers, and you will need to
32 specify this storage driver manually, as in:
34 $schema->storage_type('::DBI::MSSQL');
35 $schema->connect_info('dbi:Sybase:....', ...);
39 Brian Cassidy <bricas@cpan.org>
43 You may distribute this code under the same terms as Perl itself.