I received an error while submitting an online registration form for a
conference at the University of Mississippi. Here's the output
Errors Output
Can't locate Mail/Sendmail.pm in @INC (@INC contains:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/.
/usr/lib/perl5/5.00503/i386-linux /usr/lib/perl5/5.00503
/usr/lib/perl5/site_perl/5.005/i386-linux /usr/lib/perl5/site_perl/5.005
. /usr/local/apache/ /usr/local/apache/lib/perl) at (eval 46) line 2.
BEGIN failed--compilation aborted at (eval 46) line 2.
, /usr/lib/perl5/site_perl/5.005/Apache/ASP.pm line 1046
Debug Output
STARTING ASP HANDLER (v0.16) for file
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/registration_thank_you.asp
GlobalASA package
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa
compiling global.asa
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa
global.asa routines -
opening lock file
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/./.state/server/application.lock
created $Application -
opening lock file
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/./.state/server/internal.lock
SessionCookie - 6cc4346b79e5a631f92b9db893dcaf7b
refreshing 6cc4346b79e5a631f92b9db893dcaf7b with timeout 942417830
session timed out, clearing
opening lock file
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/./.state/6c/6cc4346b79e5a631f92b9db893dcaf7b.lock
Session_OnEnd - session: 6cc4346b79e5a631f92b9db893dcaf7b;
compiled -
state 6cc4346b79e5a631f92b9db893dcaf7b locks: 0, unlocks: 0
opening lock file
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/./.state/6c/6cc4346b79e5a631f92b9db893dcaf7b.lock
tieing session 6cc4346b79e5a631f92b9db893dcaf7b
tied session - err_mesg: ;
clearing starting session
forcing groups cleanup
testing internal time for cleanup groups
group check 6c
skipping delete self - id: 6cc4346b79e5a631f92b9db893dcaf7b;
state 6c locks: 0, unlocks: 0
cleanup groups - deleted: 0;
Application_OnEnd
compiled -
Application_OnStart
compiled -
Session_OnStart - session: 6cc4346b79e5a631f92b9db893dcaf7b;
compiled -
ASP object created - Application:
Apache::ASP::Application=HASH(0x8377504); GlobalASA:
Apache::ASP::GlobalASA=HASH(0x8578828); Internal:
Apache::ASP::State=HASH(0x85439b4); Request:
Apache::ASP::Request=HASH(0x8580f9c); Response:
Apache::ASP::Response=HASH(0x8582c7c); Server:
Apache::ASP::Server=HASH(0x8578804); Session:
Apache::ASP::Session=HASH(0x84bc128); allow_application_state: 1;
app_start: 0; basename: registration_thank_you.asp; buffering_on: 1;
cgi_do_self: 0; cgi_headers: ; clean: 0; command_line: ; compile_error:
; compile_includes: ; cookie_path: /; debug: 2; debugs_output:
ARRAY(0x8578930); dirname:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement;
errors: 0; errors_output: ARRAY(0x8563cec); filehandle: ; filename:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/registration_thank_you.asp;
filter: 0; global:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/.;
global_package: ; group_refresh: 3; groups_refresh: 3; id:
_usr_local_apache_htdocs_news_may_2000_conference_second_announcement_registration_thank_you_asp____INLINE;
includes_dir: ; init_packages: ARRAY(0x8578a8c); mail_alert_period: 20;
mail_alert_to: ; mail_errors_to: ; mail_host: ; mtime: 939937890;
no_cache: ; no_headers: 0; no_session: 0; no_state: ; package:
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa;
paranoid_session: 0; pod_comments: 1; r: Apache=SCALAR(0x8582c1c);
remote_ip: 130.101.203.136; script_timeout: 90; secure_session: ;
session_serialize: ; session_timeout: 30; soft_redirect: ; stat_inc: ;
stat_inc_match: ; state_cache: ; state_db: SDBM_File; state_dir:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/./.state;
state_manager: 10; ua: Mozilla/4.61 [en] (Win98; U); unique_packages: 0;
parsing registration_thank_you.asp
inlining include /usr/local/apache/htdocs/inc/top.inc
inlining include /usr/local/apache/htdocs/inc/bottom.inc
active undefing sub
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement_registration_thank_you_asp____INLINE
code CODE(0x85750fc) before compiling
compiling into package
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa
subid
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement_registration_thank_you_asp____INLINE
Can't locate Mail/Sendmail.pm in @INC (@INC contains:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/.
/usr/lib/perl5/5.00503/i386-linux /usr/lib/perl5/5.00503
/usr/lib/perl5/site_perl/5.005/i386-linux /usr/lib/perl5/site_perl/5.005
. /usr/local/apache/ /usr/local/apache/lib/perl) at (eval 46) line 2.
BEGIN failed--compilation aborted at (eval 46) line 2.
, /usr/lib/perl5/site_perl/5.005/Apache/ASP.pm line 1046
active undefing sub
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement_registration_thank_you_asp____INLINE
code CODE(0x85750fc) before compiling
Compile Error
Can't locate Mail/Sendmail.pm in @INC (@INC contains:
/usr/local/apache/htdocs/news/may_2000_conference/second_announcement/.
/usr/lib/perl5/5.00503/i386-linux /usr/lib/perl5/5.00503
/usr/lib/perl5/site_perl/5.005/i386-linux /usr/lib/perl5/site_perl/5.005
. /usr/local/apache/ /usr/local/apache/lib/perl) at (eval 46) line 2.
BEGIN failed--compilation aborted at (eval 46) line 2.
ASP to Perl Program
1: package
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa;
;; no strict; ;; use vars qw($Application $Session $Response $Server
$Request); ;; sub
Apache::ASP::Compiles::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement___global_asa::_usr_local_apache_htdocs_news_may_2000_conference_second_announcement_registration_thank_you_asp____INLINE
{ ;; return(1) unless $_[0]; @_ = (); ;;
2: use Mail::Sendmail;
3: use DBI;
4: my $err_mesg = ();
5: %form = %{$Request->Form()};
6:
7: if(!$form{name}[1] || !$form{name}[3])
8: {
9: $err_mesg .= 'Please enter your First and Last Name.';
10: }
11: if(!$form{mailing_address} || !$form{city} || !$form{zip} ||
!$form{state})
12: {
13: if($err_mesg)
14: {
15: $err_mesg .= '<BR>';
16: }
17: $err_mesg .= 'Please enter your full address (Address,
City, State, Zip).';
18: }
19: if($err_mesg)
20: {
21: $Session->{err_mesg} = $err_mesg;
22: $Response->Redirect('registration_form.asp');
23: }
24:
25: $dbh = DBI->connect("dbi:mSQL:umbfs") or die "COULDN'T CONNECT
=> $DBI::errstr";
26:
27: my $sql = "SELECT _seq FROM registration_form";
28: my $sth = $dbh->prepare($sql);
29: unless($sth->execute)
30: {
31: die "Statement failed: " . $sth->errstr;
32: }
33: my $row = $sth->fetch;
34: my $id = $$row[0];
35: $id = int($id);
36: $sth->finish;
37:
38: $form{workshop} = join "-", @{$form{workshop}};
39: $form{field_trip} = join "-", @{$form{field_trip}};
40: $form{name_tag} ||= qq"$form{name}[0] $form{name}[1]
$form{name}[2] $form{name}[3] $form{name}[4]";
41:
42: $sql = qq
43: [
44: INSERT INTO registration_form
45: (id, prefix, first_name, middle_name, last_name,
name_tag, title_position, company_affil, address, city, state, zip,
country, p_code, email, number, fax)
46: VALUES
47: ($id,
48: ] .
49: $dbh->quote($form{name}[0]) . "," .
50: $dbh->quote($form{name}[1]) . "," .
51: $dbh->quote($form{name}[2]) . "," .
52: $dbh->quote($form{name}[3]) . "," .
53: $dbh->quote($form{name_tag}) . "," .
54: $dbh->quote($form{title_position}) . ","
.
55: $dbh->quote($form{company_affil}) . ","
.
56: $dbh->quote($form{address}) . "," .
57: $dbh->quote($form{city}) . "," .
58: $dbh->quote($form{state}) . "," .
59: $dbh->quote($form{zip}) . "," .
60: $dbh->quote($form{country}) . "," .
61: $dbh->quote($form{p_code}) . "," .
62: $dbh->quote($form{email}) . "," .
63: $dbh->quote($form{number}) . "," .
64: $dbh->quote($form{fax}) . ")";
65:
66: unless($dbh->do($sql))
67: {
68: die "Insert failed: " . $DBI::errstr;
69: }
70:
71: my $body = "New Registration From submitted by $form{name}[0]
$form{name}[1] $form{name}[2] $form{name}[3] $form{name}[4]\n";
72: $body .= "Name Tag: $form{tag_name}\n";
73: $body .= "Email: $form{email}\n";
74: $body .= "Phone number: $form{number}\n";
75: $body .= "Fax number: $form{fax}\n";
76: $body .= "Title or Posistion: $form{title_position}\n";
77: $body .= "Company or Affiliation: $form{company_affil}\n";
78: $body .= "Address: $form{address}\n$form{city} $form{state},
$form{zip}\n$form{country} $form{p_code}\n";
79: $body .= "$form{submit_paper}\n" if $form{submit_paper};
80:
81: %mail =
82: (
83: To =>
'[EMAIL PROTECTED]',
84: CC =>
'[EMAIL PROTECTED]',
85: From => '[EMAIL PROTECTED]',
86: Message => $body
87: );
88: sendmail(%mail) or die $Mail::Sendmail::error;
89: $Response->Write('
90: <html>
91:
92: <head>
93: <title>UNIVERSITY OF MISSISSIPPI - FIELD STATION</title>
94: <script language="JavaScript" src="/js/umfsImages.js"></script>
95: <script language="JavaScript"
src="/js/formatedClockDate.js"></script>
96: <script LANGUAGE="JavaScript">
97: <!--
98:
preload(\'about_the_field_station_OFF\',\'/images/navigation_bar/about_the_field_station_OFF.gif\')
99:
preload(\'about_the_field_station_ON\',\'/images/navigation_bar/about_the_field_station_ON.gif\')
100:
101:
preload(\'field_station_news_OFF\',\'/images/navigation_bar/field_station_news_OFF.gif\')
102:
preload(\'field_station_news_ON\',\'/images/navigation_bar/field_station_news_ON.gif\')
103:
104:
preload(\'research_related_material_OFF\',\'/images/navigation_bar/research_related_material_OFF.gif\')
105:
preload(\'research_related_material_ON\',\'/images/navigation_bar/research_related_material_ON.gif\')
106: //-->
107: </script>
108:
109: </head>
110:
111: <body text="#000000" bgcolor="#003366">
112: <div align="center">
113: <center>
114: <table border="0" cellpadding="0" cellspacing="0" width="100%">
115: <tr>
116: <td align="center"><img border="0"
src="/images/main_title.gif" width="378" height="94"></td>
117: </tr>
118: </table>
119: </center>
120: </div>
121: <div align="left">
122: <table border="0" cellpadding="0" cellspacing="0" width="100%">
123: <tr>
124: <td width="748" height="20" colspan="6"></td>
125: </tr>
126: <tr>
127: <td width="83" height="7"></td>
128: <td width="9" height="7"></td>
129: <td width="22" height="7"><img border="0"
src="/images/top_left.gif" width="22" height="21"></td>
130: <td width="100%" height="7" bgcolor="#FFFFFF"> </td>
131: <td width="21" height="7" align="right"><img border="0"
src="/images/top_right.gif" width="21" height="21"></td>
132: <td width="9" height="7"></td>
133: </tr>
134: <tr>
135: <td width="83" height="470" valign="top" align="left">
136: <div align="left">
137: <table border="1" cellpadding="0" cellspacing="0">
138: <tr>
139: <td><a href="/about/"
onmouseover="changeImage(\'about_the_field_station\',\'about_the_field_station_ON\')"
onmouseout="changeImage(\'about_the_field_station\',\'about_the_field_station_OFF\')"><img
border="0" src="/images/navigation_bar/about_the_field_station_OFF.gif"
width="73" height="48" name="about_the_field_station"></a></td>
140: </tr>
141: <tr>
142: <td><a href="/news/"
onmouseover="changeImage(\'field_station_news\',\'field_station_news_ON\')"
onmouseout="changeImage(\'field_station_news\',\'field_station_news_OFF\')"><img
border="0" src="/images/navigation_bar/field_station_news_OFF.gif"
width="73" height="48" name="field_station_news"></a></td>
143: </tr>
144: <tr>
145: <td><a href="http://"
onmouseover="changeImage(\'research_related_material\',\'research_related_material_ON\')"
onmouseout="changeImage(\'research_related_material\',\'research_related_material_OFF\')"><img
border="0"
src="/images/navigation_bar/research_related_material_OFF.gif"
width="73" height="48" name="research_related_material"></a></td>
146: </tr>
147: </table>
148: </div>
149: </td>
150: <td width="9" height="470"><img border="0"
src="../images/misc/3_bits.gif" width="3" height="1"></td>
151: <td width="22" height="470" bgcolor="#FFFFFF"> </td>
152: <td width="594" height="470" valign="top" align="left"
bgcolor="#FFFFFF">
153:
<!----------------------------------------------------------------------------------------------->
154:
155:
156:
157: <div align="center">
158: <center>
159: <table border="1" cellpadding="0" cellspacing="0" width="100%"
bordercolor="#008000" bgcolor="#FFFFFF">
160: <tr>
161: <td width="100%" align="center" bgcolor="#008000"><font
color="#FFFFFF">Interest
162: Form Complete</font></td>
163: </tr>
164: <tr>
165: <td width="100%" align="center">
166: <p>Thank you,'); print "$form{name}[0] $form{name}[1]
$form{name}[2] $form{name}[3] $form{name}[4]"; $Response->Write(' for
you
167: registration to the may 2000 conference.</p>
168: <p> </td>
169: </tr>
170: </table>
171: </center>
172: </div>
173: <p>Back to the <a href="index.html">INDEX</a></p>
174:
175:
<!----------------------------------------------------------------------------------------------->
176: </td>
177: <td width="21" height="470" bgcolor="#FFFFFF"> </td>
178: <td width="9" height="470"></td>
179: </tr>
180: <tr>
181: <td width="83" height="23"></td>
182: <td width="9" height="23"></td>
183: <td width="22" height="23"><img border="0"
src="/images/bottom_left.gif" width="22" height="22"></td>
184: <td width="100%" height="23" bgcolor="#FFFFFF"> </td>
185: <td width="21" height="23" align="right"><img border="0"
src="/images/bottom_right.gif" width="21" height="22"></td>
186: <td width="9" height="23"></td>
187: </tr>
188: <tr>
189: <td width="748" height="19" colspan="6"></td>
190: </tr>
191: </table>
192: </div>
193:
194: </body>
195:
196: </html>
197:
198: <p> </p>'); ;; }
If you cannot help yourself, please send mail to [EMAIL PROTECTED] or
[EMAIL PROTECTED] about your problem, including this output.
