<form>action="http://argo.linux.sys/~nathanvi/cgi-bin/distro.pl" metho +d="POST"> Quale e' il tuo nome e cognome?<input type="text" name="nome" size="60 +" maxlength="59"> <br> Come hai conosciuto linux?<textarea name="conosciuto" rows="10" cols=" +40"></textarea><br> Quale distro usi?<br> <select name="distro" size="3"> <option value="mdk" label="mandrake">Mandrake</option> <option value="debian" label="debian">Debian</option> <option value="slack" label="slackware">Slackware</option> </select><br> <input name="Spedisci" value="Invia" type="submit"> </form>
#!/usr/bin/perl use strict; my @campi; print "Content-type:text/html\n\n"; print "<html><head><title>Distribuzione usata</title></head>\n"; print "<body>\n"; @campi = split(/\&/,$ENV{'QUERY_STRING'}); print "Il tuo nome e cognome e': $campi[0] <br>"; print "</body>\n"; print "</html>\n";
---
os: Linux Mandrake 9.0
perl: obtained with OS
In reply to Very little CGI by nathanvit
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |