2012年4月17日星期二

Re: [PerlChina] 有人精通DBIX::Class的么

不是这个问题,我DSN已经连上,如果connect以后,可以Dumper出dbix::class类。而且我修改了,还是一样的错误。
my $dbi_dsn = 'dbi:SQlite:dbname=/Users/xu/projects/opm/DBdesign/opm_new.db';

执行后,出错还是那样
------------------------
xumatoiMac:dbdesign xu$ cat t.pl
#!/usr/bin/perl

use strict;
use warnings;
use Data::Dumper;
use MyApp::Schema;


my $dbi_dsn = 'dbi:SQlite:dbname=/Users/xu/projects/opm/DBdesign/opm_new.db';
my $schema = MyApp::Schema->connect($dbi_dsn,'','',);

my $users_rs =$schema->resultset('Event');

#print Dumper $users_rs;

my $user = $users_rs->find(1);
print Dumper $user;
#$user->set_column('title' => 'helloworld');
#$user->update;

exit;


输出结果:
---------------------------------------------
umatoiMac:dbdesign xu$ t.pl
Can't locate object method "_rebless" via package "DBIx::Class::Storage::DBI::SQlite" at /Library/Perl/5.12/DBIx/Class/Storage/DBI.pm line 1153.
xumatoiMac:dbdesign xu$ 





2012/4/17 Fayland Lam <fayland@gmail.com>
it should be dbi:SQLite

not Sqlite

Thanks

2012/4/17 rochelle hsu <rjhome@gmail.com>:
> 写了一段dbix::class的代码,但运行后报错,代码如下:
> t.pl
> -------------------------------------------------------------------------------
> #!/usr/bin/perl
>
> use strict;
> use warnings;
> use Data::Dumper;
> use lib 'lib';
> use MyApp::Schem;
>
>
> my $dbi_dsn =
> 'dbi:Sqlite:dbname=/Users/xu/projects/opm/DBdesign/opm_new.db';
> my $schema = MyApp::Schem->connect($dbi_dsn,'','',);
>
> my $users_rs =$schema->resultset('Event');
>
> #print Dumper $users_rs;
>
> my $user = $users_rs->find(1);
> print Dumper $user;
> #$user->set_column('title' => 'helloworld');
> #$user->update;
>
> exit;
>
>
> --------------------------------
> 运行以后输出:
> xumatoiMac:dbdesign xu$ t.pl
> Can't locate object method "_rebless" via package
> "DBIx::Class::Storage::DBI::Sqlite" at
> /Library/Perl/5.12/DBIx/Class/Storage/DBI.pm line 1153.
>
> 请大家帮忙看看有啥问题。
>
> 2012/4/17 langq 235 <langq235@gmail.com>
>>
>> 特像写简历。。。
>>
>> --
>> 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
>> 要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com
>> 要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com
>> 若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。
>
>
> --
> 您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
> 要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com
> 要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com
> 若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。



--
Fayland Lam // http://www.fayland.org/

--
您收到此邮件是因为您订阅了 Google 网上论坛的“PerlChina Mongers 讨论组”论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。


--
您收到此邮件是因为您订阅了 Google 网上论坛的"PerlChina Mongers 讨论组"论坛。
要向此网上论坛发帖,请发送电子邮件至 perlchina@googlegroups.com。
要取消订阅此网上论坛,请发送电子邮件至 perlchina+unsubscribe@googlegroups.com。
若有更多问题,请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问此网上论坛。

没有评论: