9 my $schema = DBICTest->init_schema();
14 eval { $schema->resultset('FileColumn')->create({file=>'wrong set'}) };
15 ok($@, 'FileColumn checking for checks against bad sets');
16 my $fh = new IO::File('t/96file_column.pm','r');
17 eval { $schema->resultset('FileColumn')->create({file => {handle => $fh, filename =>'96file_column.pm'}})};
18 ok(!$@,'FileColumn checking if file handled properly.');