#!/usr/bin/perl use strict; use warnings; sub param { } if ( param() ) { my $name = param("name"); my $email = param("email"); my $phone = param("phone"); my $url = param("url"); my $requests = param("requests"); if ( $name ne "") { if ($email ne "") { if ($requests ne "") { print "very good!"; } else { print "please leave a message"; } } # You were missing me else { print "please enter your email"; } } # You were missing me else { print "please enter your name"; } }
Cheers - L~R
In reply to Re: Syntax errors with {s
by Limbic~Region
in thread Syntax errors with {s
by Anonymous Monk
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |