Problems Registering For the First Time

[prev] [thread] [next] [lurker] [Date index for 2003/11/24]

From: Shlomi Fish
Subject: Problems Registering For the First Time
Date: 20:15 on 24 Nov 2003
--Boundary-00=_Prkw/2G8imvRGzq
Content-Type: text/plain;
  charset="us-ascii"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

After I set up Yapcom, and tried to register the first user, it did not work, 
for some reason. I get an Apache error and the Apache error log only say:

<<<
[Mon Nov 24 20:08:23 2003] [error] [client 127.0.0.1] Premature end of script 
headers: yapc.pl
>>>

Still a record is entered into the database:

<<<
$ sqlite yapc.db
SQLite version 2.8.6
Enter ".help" for instructions
sqlite> SELECT * FROM people ;
1|Shlomi|Fish|shlomif@xxxx.xxx.xx|password|a274AmOKY8VCBe2Mbb3O|0|The 
Technion||||||03-6424668|SHLOMIF|http://t2.technion.ac.il/~shlomif/|Israel|None 
of your business||
sqlite>
>>>

My hunch is that the reason is that sendmail is not installed on my computer. 
Nevertheless Yapcom should report it and not leave a stray record. Is there 
any reason we use Mail::Sendmail instead of Net::SMTP or whatever is the 
Mail:: equivalent?

I'm attaching an LWP script that reproduces the problem.

Regards,

	Shlomi Fish

-- 

---------------------------------------------------------------------
Shlomi Fish      shlomif@xxxx.xxx.xx
Homepage: http://t2.technion.ac.il/~shlomif/

I don't believe in fairies. Oops! A fairy died.
I don't believe in fairies. Oops! Another fairy died.

--Boundary-00=_Prkw/2G8imvRGzq
Content-Type: text/x-perl;
  charset="us-ascii";
  name="break-yapcom.pl"
Content-Transfer-Encoding: 7bit
Content-Disposition: attachment;
	filename="break-yapcom.pl"

#!/usr/bin/perl -w

use strict;

use LWP::UserAgent;

my $ua = LWP::UserAgent->new();

# Change me
my $yapcom_url = "http://localhost/yapcom/";;

my $url = "$yapcom_url/registration.html";

my %params = 
(
    'fname' => "Shlomi",
    'lname' => "Fish",
    email => "shlomif\@iglu.org.il",
    phone => "03-6424668",
    password => "password",
    password2 => "password",
    company => "The Technion",
    'pauseid' => "SHLOMIF",
    url => "http://t2.technion.ac.il/~shlomif/";,
    mongers => "Israel",
    bio => "None of your business",
    run => "registration",
);

my $response = $ua->post($url, \%params);

print $response->as_string();


--Boundary-00=_Prkw/2G8imvRGzq--

Generated at 08:06 on 26 Nov 2003 by mariachi 0.51