Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
executable file 18 lines (10 sloc) 261 Bytes
#!/usr/bin/perl
use strict;
use warnings;
use VegGuide::Location;
VegGuide::Location->DataFeedRSSFile();
for my $location ( VegGuide::Location->All() )
{
next unless $location->descendants_vendor_count() > 500;
$location->data_feed_rss_file();
}
Jump to Line
Something went wrong with that request. Please try again.