On Thu, Sep 1, 2011 at 5:52 PM, Rajeev Prasad <[email protected]> wrote:
> thx.
>
> but when i put search item as 'test12' I get error:
>
>
> $ get-data-from-db.pl
> Use of uninitialized value in concatenation (.) or string at ./
> get-data-from-db.pl line 23.
> user is:
> here is the code again, i think i have defined every variable.....
> ==========================================================
> #!/usr/bin/perl
> use strict;
> use warnings;
> use lib '../testdb';
> use Mysqltestdb::Schema;
> my ($schema, $user, $users_rs, $userid);
> my (@newusers, @oldusers);
> $schema =
> Mysqltestdb::Schema->connect("dbi:mysql:dbname=mysqltestdb:localhost:3306",
> 'root', 'mysql5');
> $users_rs = $schema->resultset('Testdbuser')->search(
> { 'userid' => 'test12' }, ## WHERE
>
> {
> select => [ qw/userid password/ ], ## SELECT
> as => [ qw/uid pass/ ],
> }
> );
>
> while ($user = $users_rs->next ()){
> print "user is:" . $user->userid . "\n";
> };
>
> =============================================================================
>
>
You've selected "userid" as "uid", but you're still trying to access it as
$user->userid.
Ronald
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[email protected]
