my %config; while () { my ($var, $val) = split (/:/, $_); $config{$var} = $val; } __DATA__ store_dir:/path-to/the-store-dir