Class 22 review (07/11/2002)

$string = "Mark Jacobson#11#UNI#Panthers#Caps";

@a = split(/#/, $string);

for ($i = 0; $i < @a; $i++)
{
   print "$a[$i] \n";
   $a[$i] =~ tr/abc/xyz/;
}

# $front = shift @a;     COMMENTED OUT
# push(@a, $front);      COMMENTED OUT

$back = pop @a;
unshift(@a, $back);

for ($i = 0; $i < @a; $i++)

{
   print "$a[$i] \n";
}

$string = join("#", @a);

print "\n$string\n\n";

  1. Random colors, simpler version.

  2. Random colors PERL code, study it.

  3. Random colors, with an OL list. This is YOUR JavaScript assignment. Implement this in JavaScript. Wait - this assignment is postponed till later.

  4. Random colors version #2 PERL code, study it and translate it into JavaScript .html page, by Tuesday, July 16th.
venkman@bebop:~/web/cgi-bin$ cat srand.pl

srand;

for ($i = 1; $i <= 8; $i++)
{
   print int (rand(365)) + 1;
   print "\n";
}

venkman@bebop:~/web/cgi-bin$ perl srand.pl
116
277
357
327
153
106
146
105
venkman@bebop:~/web/cgi-bin$
venkman@bebop:~/web/cgi-bin$ perl srand.pl
333
109
189
28
343
105
11
100