my $file = '/path/db.txt'; open FILE, '<', $file or die $!; chomp(my ($auth) = ); my ($dbuser, $dbpasswd) = split('\t', $auth); close FILE;