Why all the repetition? How about:
srand;
$filenumber = int (rand (4));
$bodytag = 'BODY BACKGROUND=/images/celtknt;
print $bodytag . $filenumber . '.jpg' . \n;
On Thu, 14 Jun 2001 17:09:43 -0400, [EMAIL PROTECTED] (Luinrandir
Hernson) wrote:
srand;
$A = int (rand (4))
if ($A eq '0')
]
Subject: So what am I doing incorrectly??
srand;
$A = int (rand (4))
if ($A eq '0') {print BODY BACKGROUND=\images/celtknt0.jpg\\n};
if ($A eq '1') {print BODY BACKGROUND=\images/celtknt1.jpg\\n};
if ($A eq '2') {print BODY BACKGROUND=\images/celtknt2.jpg\\n};
if ($A eq '3') {print BODY
Try:
$A == 0
eq is for string comparisons and $A contains an integer.
Greg S.
Greg S.
-Original Message-
From: Luinrandir Hernson [mailto:[EMAIL PROTECTED]]
Sent: Thursday, June 14, 2001 3:10 PM
To: [EMAIL PROTECTED]
Subject: So what am I doing incorrectly??
srand
Luinrandir Hernson wrote:
: srand;
: $A = int (rand (4))
: if ($A eq '0') {print BODY BACKGROUND=\images/celtknt0.jpg\\n};
: if ($A eq '1') {print BODY BACKGROUND=\images/celtknt1.jpg\\n};
: if ($A eq '2') {print BODY BACKGROUND=\images/celtknt2.jpg\\n};
: if ($A eq '3') {print BODY
--- Luinrandir Hernson [EMAIL PROTECTED] wrote:
srand;
$A = int (rand (4))
if ($A eq '0') {print BODY BACKGROUND=\images/celtknt0.jpg\\n};
if ($A eq '1') {print BODY BACKGROUND=\images/celtknt1.jpg\\n};
if ($A eq '2') {print BODY BACKGROUND=\images/celtknt2.jpg\\n};
if ($A eq '3') {print