Any insight is greatly appreciated :)#! /usr/bin/env perl use strict; use warnings; use Getopt::Long; use DBIx::Class::ResultSet; use Data::Dumper; use My::App::Schema; use Smart::Comments '###'; my $max_records = ''; GetOptions("max_records=i" => \$max_records) or die ("Error in command line arguments\n"); my @results = My::App::Schema->schema->resultset('MyTable')->all; for my $result ( @results ) { ### Processing Domain ID: ($result->id) for ( 0..$max_records ) { print $result."\n"; } }
In reply to Iterating through DBIx::Class resultset by PerlSufi
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |