I ended up with using Config::Any::Perl:
in /myapp.perl
package MyApp::ConfigurationSet;
$home = Path::Class::Dir->new(MyApp->config->{home});
.......
$var_dir = $home->subdir('var');
$pid_dir = $var_dir->subdir('pid');
$log_dir = $var_dir->subdir('log');
$log_file = $log_dir->file('default.log');
..........
return +{
map { $_ => ${"RGames::ConfigurationSet::$_"} }
grep { $_ !~ /^BEGIN$/ }
keys %{"MyApp::ConfigurationSet::"}
};
:))))
_______________________________________________
List: [email protected]
Listinfo: http://lists.rawmode.org/mailman/listinfo/catalyst
Searchable archive: http://www.mail-archive.com/[email protected]/
Dev site: http://dev.catalyst.perl.org/
