%def = (
   default_option_use_log => 1,
   default_option_read_conf => 1,
   default_option_run_debug => "false",
   default_output_path => "/tmp/vvv",
   default_name => "stat_",
   default_option_save_state => "true"
);

##</code><code>##

foreach (map { /^default_option_(.*)/ ? $1 : () } keys %def) {
	$s{"option_$_"} = $def{"default_option_$_"};
}

foreach (keys %s) {
	print "\%s: $_ => $s{$_}\n";
}