hope that this helped you!#!/usr/bin/perl -w use strict; use CGI qw(param); my $choice = param("choice"); print "content-type: html/text\n\n"; if(!$choice) { print "<html><body><br>1. New discussion thread<br>2. R +elevant information<br></body></html>"; exit } if($choice == 1) { print "<html><body><br> Welcome to new discussion</ +body></html>";exit } if($choice == 2) { print "<html><body><br> Welcome to relevant informa +tion</body></html>";exit }
In reply to Re: Very Basic Perl Forum
by Alex the Serb
in thread Very Basic Perl Forum
by the_edge30
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |