1 |
#!/usr/bin/perl |
#!/usr/bin/perl -d:DProf |
2 |
## wiki.cgi --- This is SuikaWiki, yet another WikiEngine |
BEGIN { $0 = ''.$0 } |
|
$0 = ''.$0; |
|
3 |
use strict; |
use strict; |
4 |
use CGI::Carp qw(fatalsToBrowser); |
use CGI::Carp qw(fatalsToBrowser); |
5 |
require 'wikidata/suikawiki-config.ph'; ## the site configuration script |
require 'wikidata/suikawiki-config.ph'; ## the site configuration script |
6 |
require 'suikawiki.pl'; ## the main script |
require 'suikawiki.pl'; ## the main script |
7 |
|
|
|
package SuikaWiki; |
|
|
our $VERSION = '2.2'; |
|
|
|
|
8 |
=head1 NAME |
=head1 NAME |
9 |
|
|
10 |
wiki.cgi --- SuikaWiki: Yet yet another WikiEngine |
wiki.cgi --- SuikaWiki: Yet yet another WikiEngine |