##
use utf8;
use CGI qw(-utf8);
binmode(STDOUT, ":utf8");
1;
sub exportdatabase {
#INCOMING GLOBAL VARS: $statement, $db_export_file,
# $cur_date, $cur_time, $OS, $table, $quest
fork: {
#...truncated.
####
my $template = <
My Page Title
$dragcss
$positionscript
$AJAXJS
... Put the main content here.
TEMPLATE