Tadashi Okoshi
slash****@users*****
2005年 12月 17日 (土) 04:49:59 JST
Index: affelio/index.cgi
diff -u affelio/index.cgi:1.25 affelio/index.cgi:1.26
--- affelio/index.cgi:1.25 Sat Dec 17 03:10:13 2005
+++ affelio/index.cgi Sat Dec 17 04:49:59 2005
@@ -1,4 +1,4 @@
-#!/usr/bin/perl
+#!/usr/bin/perl -d:DProf
# Copyright (C) 2005 FishGrove Inc.
#
@@ -16,14 +16,12 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
-# $Id: index.cgi,v 1.25 2005/12/16 18:10:13 slash5234 Exp $
+# $Id: index.cgi,v 1.26 2005/12/16 19:49:59 slash5234 Exp $
use strict;
use lib("./extlib");
use CGI qw(-unique_headers);
-$CGI::DISABLE_UPLOADS = 1;
-$CGI::POST_MAX = 102_400;
use CGI::Session; #qw(-ip_match);
use HTML::Template;
use Error qw(:try);
@@ -36,7 +34,6 @@
use Affelio::misc::NetMisc;
use Affelio::misc::Time;
use Affelio::misc::WebInput;
-use Affelio::SNS::Handshaker_c;
debug_print("index.cgi: start.");
my $q = new CGI;