use vars qw(@c); @c = ( id => 'tutorials', title => "Tutorials", abstract => < 'Application Design', chapters => [qw( apps/scale_etoys/etoys.pod )], group => 'Templating', chapters => [qw( tmpl/comparison/comparison.pod )], group => 'Tips and Tricks', chapters => [qw( tips/mod_perl_tricks/mod_perl_tricks.pod )], group => 'Client side facts and bugs', chapters => [qw( client/browserbugs/browserbugs.pod client/compression/compression.pod )], changes => 'Changes.pod', copy_glob => [qw( */*/*.png )], );