Select Code to Download

my $rs = $schema->resultset("UrTable")->search({ ur => "search" });

...
{
    $csv->say( \*STDOUT, [ @vals ] );
}