v::config;
use strict;
use warnings FATAL => 'all';
# Import Module :
use Data::Dumper;
use JSON;
use JSON::XS;
use UNIVERSAL::ref;
use Hash::MultiValue;
use Term::ReadKey;
use GnuPG qw( :algo );
use
my $data_cfg = decode_json($get_cfg);
$data = $data_cfg;
} else {
BlankOnDev::Utils::file->create($file_name, $dir_dev, encode_json($format_config));
e {
mkdir($dir_dev);
BlankOnDev::Utils::file->create($file_name, $dir_dev, encode_json($format_config));
$data = $format_config;
}
$gencfg = $data;
}
# Subroutine for
package BlankOnDev::config::save;
use strict;
use warnings FATAL => 'all';
# Import Module :
use JSON::XS;
use BlankOnDev::Utils::file;
# Version :
our $VERSION = '0.1005';
# Subroutine save key co
-
sub save_to_file {
my ($self, $filename, $dir_dev, $data) = @_;
my $data_file = encode_json($data);
my $create_file = BlankOnDev::Utils::file->create($filename, $dir_dev, $data_file);
i.
sudo cpan -i Crypt::Blowfish Digest::MD5
sudo cpan -i MIME::Base64 MIME::Base64::Perl JSON DateTime
sudo cpan -i GnuPG Hash::MultiValue Term::ReadKey LWP::UserAgent
sudo cpan -i Te
ar2GitHub;
use strict;
use warnings FATAL => 'all';
# Import Module :
use Data::Dumper;
use JSON;
use JSON::XS;
use Term::ReadKey;
use Hash::MultiValue;
use BlankOnDev::DateTime;
use BlankOnDev::Util
my ($new_config) = @_;
# Create File :
my $newData_cfg = encode_json($new_config);
BlankOnDev::Utils::file->create($file_name, $dir_dev, $newData_cfg);
my ($new_config) = @_;
# Create File :
my $newData_cfg = encode_json($new_config);
BlankOnDev::Utils::file->create($file_name, $dir_dev, $newData_cfg);