#!/usr/bin/perl use warnings; use strict; use Config::Tiny; my $file = 'config.conf'; my $config = Config::Tiny->read($file); # get the master_user for the Database my $db_user = $config->{Database}{master_user}; print "$db_user\n"; # get the logging level my $verbose = $config->{Logging}{verbose}; print "$verbose\n";