The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

App::ygeo::yaml - Set of functions for working with yaml config files

VERSION

version 0.01

SYNOPSIS

    use App::ygeo::yaml qw[:ALL];
    
    my @config_files = (
        File::Spec->catfile(getcwd(), '.ygeo'), 
        $ENV{"HOME"}.'/.ygeo'
    );
    my @required_keys = qw/api_key city/;

    my $params = data_from_first_valid_cfg( \@config_files, \@required_keys );
    $params = create_cfg($config_files[0], @required_keys) unless $params;

data_from_first_valid_cfg

Check for first valid config and return data from it as hash

    data_from_first_valid_cfg( [ '.ygeo', '~/.ygeo' ], [ 'apikey', 'city'] );

If no valid config found return undef

keys_exists_no_empty

Check that all required keys exists and their values are not empty

    keys_exists_no_empty( { api_key => 1111, city => 'ROV' } , ['api_key', 'city'] )

create_cfg

Create config in current directory with required parameters

    create_cfg( '.ygeo', 'apikey', 'city' );

Will create user promt

Return hash with inputed parameters

AUTHOR

Pavel Serikov <pavelsr@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2018 by Pavel Serikov.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.