use Config::Tiny; my $cfg = Config::Tiny->read("$ENV{HOME}/.vnc/config"); $geometry = $cfg->{_}{geometry} if exists $cfg->{_}{geometry};