<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META content="text/html; charset=iso-8859-1" http-equiv=Content-Type>
<META name=GENERATOR content="MSHTML 8.00.6001.18812">
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT size=2 face=Arial>sorted</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV> </DIV>
<BLOCKQUOTE
style="BORDER-LEFT: #000000 2px solid; PADDING-LEFT: 5px; PADDING-RIGHT: 0px; MARGIN-LEFT: 5px; MARGIN-RIGHT: 0px">
<DIV style="FONT: 10pt arial">----- Original Message ----- </DIV>
<DIV
style="FONT: 10pt arial; BACKGROUND: #e4e4e4; font-color: black"><B>From:</B>
<A title=vk4tec@tech-software.net
href="mailto:vk4tec@tech-software.net">Andrew Rich</A> </DIV>
<DIV style="FONT: 10pt arial"><B>To:</B> <A title=aprssig@tapr.org
href="mailto:aprssig@tapr.org">TAPR APRS Mailing List</A> </DIV>
<DIV style="FONT: 10pt arial"><B>Sent:</B> Friday, October 09, 2009 5:41
PM</DIV>
<DIV style="FONT: 10pt arial"><B>Subject:</B> [aprssig] Web page help</DIV>
<DIV><BR></DIV>
<DIV><FONT size=2 face=Arial>Hello</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>I am trying to post a large text string to a cgi
(perl) so I can process it line by line</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>Can someone help me ?</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>I have this so far</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial>-------------------- send code
--------------------------------------------------------</FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV>
<DIV><FONT size=2 face=Arial><FORM ACTION="/cgi-bin/test.cgi"
METHOD="POST"><BR><textarea cols="50" rows="4"
name="comment"></textarea><BR></FONT><FONT size=2
face=Arial><input type=submit value="Submit Details"><BR><input
type=reset value="Reset"> </FONT></DIV>
<DIV><FONT size=2 face=Arial></FONT> </DIV><FONT size=2 face=Arial>
<DIV><FONT size=2 face=Arial>-------------------- process code
--------------------------------------------------------</FONT></DIV>
<DIV> </DIV>
<DIV> </DIV>
<DIV>#!/usr/bin/perl<BR>print "Content-type: text/html\n\n";<BR>@pairs=
split(/&/, $ENV{'QUERY_STRING'});<BR>foreach $pair (@pairs) </DIV>
<DIV>{<BR>($name, $value) = split(/=/, $pair);</DIV>
<DIV>print $name."=".$value;<BR>$FORM{$name} = $value;<BR>@lines =
$comment;</DIV>
<DIV>foreach (@lines) {<BR>print $_;<BR>}</DIV>
<DIV> </DIV>
<DIV>Andrew</DIV>
<DIV> </DIV>
<DIV></FONT> </DIV>
<P>
<HR>
<P></P>_______________________________________________<BR>aprssig mailing
list<BR>aprssig@tapr.org<BR>https://www.tapr.org/cgi-bin/mailman/listinfo/aprssig<BR>
<P>
<HR>
<P></P><BR>No virus found in this incoming message.<BR>Checked by AVG -
www.avg.com <BR>Version: 8.5.421 / Virus Database: 270.14.8/2423 - Release
Date: 10/08/09 18:33:00<BR></BLOCKQUOTE></BODY></HTML>