Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Fetching contributors…

Cannot retrieve contributors at this time

executable file 19 lines (11 sloc) 0.272 kB
#!/usr/bin/perl
use strict;
use warnings;
use VegGuide::VendorSource;
my $only = shift;
my $sources = VegGuide::VendorSource->All();
while ( my $source = $sources->next() )
{
next if $only && $source->vendor_source_id() != $only;
$source->process_feed();
}
Jump to Line
Something went wrong with that request. Please try again.