[Dbix-class] Use of resultset-> search within a sub

[gvim]

Sorry, call to get_row_id should have no args as below but the result is 
the same when using an arg list:

#!/usr/bin/perl
use 5.014;
use lib '/Users/me/app/lib';
use DBIx::Class;
use Schema;
use autodie;

my $dsn = 'dbi:Pg:dbname=astro;host=localhost';
my $dbh = Schema->connect($dsn, 'admin', 'pass', {RaiseError => 1, 
PrintError => 0});
my $table = 'TimeZone';
my $data = { region => 'America', state => 'Argentina', city => 
'Buenos_Aires' };
# my $row = $dbh->resultset($table)->search($data)->single;
# say $row->id;

say get_row_id();

sub get_row_id {
  my $row = $dbh->resultset($table)->search->($data)->single;
  return $row->id;
}



gvim

_______________________________________________
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/dbix-class@lists.scsys.co.uk