view release on metacpan or  search on metacpan

script/ddflare  view on Meta::CPAN

die "Invalid arguments"
    unless @ARGV == 1;
Readonly my $CONFIG_FILE => shift;

=head2 loadConfig
    
Loads in the configuration file, which is YAML, the structure
is an array of hashrefs.

The first element being { user => ..., key => ... } which are 
CloudFlare credentials.

Subsequent elements are { zone => ..., domains => [ ... ] }  which are
cloudflare zones, and the subdomains within them to update. An
undefined value in domains represents the zone itself.

    loadConfig($PATH_TO_CONFIG);

=cut

sub loadConfig {