SUMMARY: CGI script

"Jeremy Rodriguez" <jeremyrodriguez-ha5VgVVzQG/zxgTakmzh5gC/[email protected]>
Newsgroups gmane.linux.admin.managers
Message-ID <[email protected]>
I am surprised everyone missed the obvious
I left out the !
Should have been #!/usr/bin/perl

I can't believe I missed it  :->

-----Original Message-----
From: linuxmanagers-bounces-35TzE1X9F6582KRnZfj+bdi2O/[email protected]
[mailto:linuxmanagers-bounces-35TzE1X9F6582KRnZfj+bdi2O/[email protected]]On Behalf Of Jeremy
Rodriguez
Sent: Friday, May 30, 2003 9:37 AM
To: Linux Group
Subject: CGI script

Also here is the script
#/usr/bin/perl --
use CGI;

$q = new CGI;

$name = $q->param('name');
$propertyaddress = $q->param('propertyaddress');
$city = $q->param('city');
$state = $q->param('state');
$zip = $q->param('zip');
$phone = $q->param('phone');
$email = $q->param('email');
$status = $q->param('status');
$relationship = $q->param('relationship');
$propertytype = $q->param('propertytype');
$condition = $q->param('condition');
$size = $q->param('size');
$squarefootage = $q->param('squarefootage');
$bedrooms = $q->param('bedrooms');
$bathrooms = $q->param('bathrooms');
$parking = $q->param('parking');
$email = $q->param('email');
$spaces = $q->param('spaces');
$listingstatus = $q->param('listingstatus');
$planning = $q->param('planning');

open (MAIL, "| /usr/sbin/sendmail -f \"Loan Inquiry\" -t");
        print MAIL "To: user\@domain2.com\n";
        print MAIL "Subject: Home Loan Inquiry\n\n";
        print MAIL<<END;
        Name: $name
        Property Address: $propertyaddress
        City: $city
        State: $state
        Zip Code: $zip
        Phone Number: $phone
        Email Address: $email
        Resident Status: $status
        Relationship: $relationship
        Resident Status: $status
        Relationship: $relationship
        Type of Property: $propertytype
        Overall Condition: $condition
        Lot Size / Acreage: $size
        Approximate Square Footage: $squarefootage
        Number of Bedrooms: $bedrooms
        Number of Bathrooms: $bathrooms
        Parking: $parking
        Spaces: $spaces
        Listing Status: $listingstatus
        Planning to sell: $planning


END

## DO NOT forget to close the pipe
close MAIL;

## send new html document to browser
print "Location: /thank_you.htm\n\n";
submissions: LinuxManagers-35TzE1X9F6582KRnZfj+bdi2O/[email protected]
subscribe/unsubscribe:
http://www.linuxmanagers.org/mailman/listinfo/linuxmanagers
_______________________________________________
LinuxManagers mailing list - http://www.linuxmanagers.org
submissions: LinuxManagers-35TzE1X9F6582KRnZfj+bdi2O/[email protected]
subscribe/unsubscribe: http://www.linuxmanagers.org/mailman/listinfo/linuxmanagers
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.