use vars qw(@c); @c = ( id => 'docs_1.0', title => "mod_perl 1.0 Documentation", stitle => "1.0", abstract => < [qw( guide os api )], );