use Config::Tiny; my $ini = Config::Tiny->read( 'whoamI.ini', 'encoding(Windows-1252)' ); my ($user, $pass, $mail) = ($ini->{Main}{user},$ini->{Main}{pass},$ini->{Main}{mail});