Binary.pm   [plain text]

package Binary;

BEGIN { unshift @INC, './t/testlib'; }

use strict;
use base 'PgBase';

__PACKAGE__->table(cdbibintest => 'cdbibintest');
__PACKAGE__->sequence('binseq');
__PACKAGE__->columns(All => qw(id bin));

# __PACKAGE__->data_type(bin => DBI::SQL_BINARY);

sub schema { "id INTEGER, bin BYTEA" }

1;