sub SiteSetting {
my $key = shift || return();
my $site_id = $ENV{DOCUMENT_ROOT};
if ( exists $SETTING{$site_id}->{$key} ) {
return $SETTING{$site_id}->{$key};
} else {
my $sql = sql("SELECT key,value FROM setting WHERE key='$key';");
if ($$sql[0] eq $key) {
$SETTING{$site_id}->{$key} = $$sql[1];
return $SETTING{$site_id}->{$key};
} else { return; }
}
}