[- BEGIN { unshift(@INC, $ENV{SW_PERLDIR}); } use SW::Site::rcm; # # create site object # my $site = SW::Site::rcm->new( $ENV{SW_CONFIG} ); # # output the page # print OUT $site->pageLegal(); -]