Help for this page
my $style_file = sprintf "%s/main/%s.xsl", $$config{dir}, $$config{sty +le};
my $style_file = join "/", $$config{dir}, 'main', "$$config{style}.xsl +";