Help for this page

Select Code to Download


  1. or download this
    sub getnew {
    my ($self) = @_;

    $self->dbs->query($self->getnewsql)->hashes;
}
  2. or download this
    package Local::GetDataTable;

...
};

1;
  3. or download this
    override '_build_getnewsql' => sub {
    my ($self) = @_;
    my $sql = super();
    $sql .= sprintf "AND location = %d", $self->location;
};