1 2 3 4 5
my $sth = $dbh->prepare("{{_cursor_}}"); $sth->execute; while (my @row = $sth->fetchrow_array) { #print join(', ', @row), "\n"; }