{\rtf1\ansi\ansicpg1252\uc1\deff0\stshfdbch13\stshfloch0\stshfhich0\stshfbi0\deflang1033\deflangfe2052{\fonttbl{\f0\froman\fcharset0\fprq2{\*\panose 02020603050405020304}Times New Roman{\*\falt Thorndale};}
{\f2\fmodern\fcharset0\fprq1{\*\panose 02070309020205020404}Courier New{\*\falt Cumberland};}{\f5\fmodern\fcharset0\fprq1{\*\panose 02070409020205020404}Courier;}
{\f13\fnil\fcharset134\fprq2{\*\panose 02010600030101010101}SimSun{\*\falt \'cb\'ce\'cc\'e5};}{\f181\fnil\fcharset134\fprq2{\*\panose 02010600030101010101}@SimSun;}{\f252\froman\fcharset238\fprq2 Times New Roman CE{\*\falt Thorndale};}
{\f253\froman\fcharset204\fprq2 Times New Roman Cyr{\*\falt Thorndale};}{\f255\froman\fcharset161\fprq2 Times New Roman Greek{\*\falt Thorndale};}{\f256\froman\fcharset162\fprq2 Times New Roman Tur{\*\falt Thorndale};}
{\f257\froman\fcharset177\fprq2 Times New Roman (Hebrew){\*\falt Thorndale};}{\f258\froman\fcharset178\fprq2 Times New Roman (Arabic){\*\falt Thorndale};}{\f259\froman\fcharset186\fprq2 Times New Roman Baltic{\*\falt Thorndale};}
{\f260\froman\fcharset163\fprq2 Times New Roman (Vietnamese){\*\falt Thorndale};}{\f272\fmodern\fcharset238\fprq1 Courier New CE{\*\falt Cumberland};}{\f273\fmodern\fcharset204\fprq1 Courier New Cyr{\*\falt Cumberland};}
{\f275\fmodern\fcharset161\fprq1 Courier New Greek{\*\falt Cumberland};}{\f276\fmodern\fcharset162\fprq1 Courier New Tur{\*\falt Cumberland};}{\f277\fmodern\fcharset177\fprq1 Courier New (Hebrew){\*\falt Cumberland};}
{\f278\fmodern\fcharset178\fprq1 Courier New (Arabic){\*\falt Cumberland};}{\f279\fmodern\fcharset186\fprq1 Courier New Baltic{\*\falt Cumberland};}{\f280\fmodern\fcharset163\fprq1 Courier New (Vietnamese){\*\falt Cumberland};}
{\f384\fnil\fcharset0\fprq2 SimSun Western{\*\falt \'cb\'ce\'cc\'e5};}{\f2064\fnil\fcharset0\fprq2 @SimSun Western;}}{\colortbl;\red0\green0\blue0;\red0\green0\blue255;\red0\green255\blue255;\red0\green255\blue0;\red255\green0\blue255;
\red255\green0\blue0;\red255\green255\blue0;\red255\green255\blue255;\red0\green0\blue128;\red0\green128\blue128;\red0\green128\blue0;\red128\green0\blue128;\red128\green0\blue0;\red128\green128\blue0;\red128\green128\blue128;\red192\green192\blue192;}
{\stylesheet{\ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 \fs20\cf1\lang1033\langfe255\loch\f0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 \snext0 Normal;}{\*\cs10 \additive \ssemihidden Default Paragraph Font;}{\*
\ts11\tsrowd\trftsWidthB3\trpaddl108\trpaddr108\trpaddfl3\trpaddft3\trpaddfb3\trpaddfr3\trcbpat1\trcfpat1\tscellwidthfts0\tsvertalt\tsbrdrt\tsbrdrl\tsbrdrb\tsbrdrr\tsbrdrdgl\tsbrdrdgr\tsbrdrh\tsbrdrv 
\ql \li0\ri0\widctlpar\aspalpha\aspnum\faauto\adjustright\rin0\lin0\itap0 \fs20\lang1024\langfe1024\loch\f0\hich\af0\dbch\af13\cgrid\langnp1024\langfenp1024 \snext11 \ssemihidden Normal Table;}{\s15\ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 
\fs24\cf1\lang1033\langfe255\loch\f0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 \snext15 Default;}{\s16\ql \li0\ri0\nowidctlpar\tqc\tx4320\tqr\tx8640\aspalpha\faauto\rin0\lin0\itap0 
\fs24\cf1\lang1033\langfe255\loch\f0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 \sbasedon15 \snext16 header;}{\*\cs17 \additive \fs24\cf1\lang0\langfe255\langnp0\langfenp255 Numbering Symbols;}}{\*\latentstyles\lsdstimax156\lsdlockeddef0}
{\*\rsidtbl \rsid267976\rsid1394066\rsid16208089}{\*\generator Microsoft Word 11.0.6359;}{\info{\title CIS 480 - Perl in Depth - Fall 2004}{\author Sharon Tuttle}{\operator Academic Computing}{\creatim\yr2004\mo10\dy21\hr14\min40}
{\revtim\yr2004\mo10\dy21\hr14\min40}{\printim\yr2004\mo9\dy16\hr9\min7}{\version2}{\edmins2}{\nofpages2}{\nofwords507}{\nofchars2893}{\*\company CNRS-HSU}{\nofcharsws3394}{\vern24703}}\margt2093 
\deftab1250\widowctrl\ftnbj\aenddoc\noxlattoyen\expshrtn\noultrlspc\dntblnsbdb\nospaceforul\hyphcaps0\horzdoc\dghspace120\dgvspace120\dghorigin1701\dgvorigin1984\dghshow0\dgvshow3\jcompress\viewkind1\viewscale75\nolnhtadjtbl\rsidroot267976 \fet0
{\*\ftnsep \pard\plain \ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 \fs20\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\insrsid13651041 \chftnsep 
\par }}{\*\ftnsepc \pard\plain \ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 \fs20\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\insrsid13651041 \chftnsepc 
\par }}{\*\aftnsep \pard\plain \ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 \fs20\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\insrsid13651041 \chftnsep 
\par }}{\*\aftnsepc \pard\plain \ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 \fs20\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\insrsid13651041 \chftnsepc 
\par }}\sectd \sbknone\linex0\headery1440\sectdefaultcl\sftnbj {\header \pard\plain \s16\ql \li0\ri0\nowidctlpar\tqc\tx4320\tqr\tx8640\aspalpha\faauto\rin0\lin0\itap0 \fs24\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {
\fs16\insrsid13651041 \hich\af0\dbch\af13\loch\f0 CIS 480 -  Week 9 Lab Exercise \tab \tab p. }{\field{\*\fldinst {\fs16\insrsid13651041 \\\hich\af0\dbch\af13\loch\f0 page}}{\fldrslt {\fs16\lang1024\langfe1024\noproof\insrsid1394066 
\hich\af0\dbch\af13\loch\f0 1}}}{\insrsid13651041 
\par }{\fs16\insrsid13651041 \hich\af0\dbch\af13\loch\f0 Fall 2004
\par }}{\*\pnseclvl1\pnucrm\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl2\pnucltr\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl3\pndec\pnstart1\pnindent720\pnhang {\pntxta .}}{\*\pnseclvl4\pnlcltr\pnstart1\pnindent720\pnhang {\pntxta )}}
{\*\pnseclvl5\pndec\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl6\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl7\pnlcrm\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl8
\pnlcltr\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}{\*\pnseclvl9\pnlcrm\pnstart1\pnindent720\pnhang {\pntxtb (}{\pntxta )}}\pard\plain \s15\qc \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 
\fs24\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\b\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 CIS 480 - Perl in Depth - Fall 2004
\par \hich\af0\dbch\af13\loch\f0 WEEK 9 LAB EXERCISE
\par 
\par \hich\af0\dbch\af13\loch\f0 week 9 lab exercise due: Thursday,  October 21st , END of lab
\par }\pard \s15\ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 {\b\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 ---------------------------------------------------------------------------------------------------------
\par }{\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 For EACH of the scripts below, you are required to begin EACH with the following:
\par }{\b\fs20\insrsid13651041 
\par }{\b\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 #!/usr/bin/perl -w
\par \hich\af0\dbch\af0\loch\f2 ###480-author: }{\i\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 yourLastName}{\b\fs20\loch\af2\insrsid13651041 
\par }{\b\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 ###480-scriptname:}{\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2  }{\i\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 y
\hich\af0\dbch\af0\loch\f2 ourScriptName}{\b\fs20\loch\af2\insrsid13651041 
\par }{\b\i\fs20\loch\af2\insrsid13651041 
\par }{\b\i\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 (}{\b\i\fs28\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 THEN}{\b\i\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2  an }{
\b\i\fs20\ul\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 opening comment block }{\b\i\fs20\loch\af2\dbch\af0\insrsid13651041 \hich\af0\dbch\af0\loch\f2 
containing the NAME of the script file, your name, the date, and a brief description of the purpose of this script)
\par }{\b\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 ----------------------------------------------------------------------------------------------\hich\af0\dbch\af13\loch\f0 ----------
\par }\pard \s15\ql \fi-420\li420\ri0\nowidctlpar\aspalpha\faauto\rin0\lin420\itap0 {\b\fs22\ul\insrsid13651041 \hich\af0\dbch\af13\loch\f0 WEEK 9 LAB EXERCISE
\par }{\b\fs20\ul\insrsid13651041 
\par }\pard \s15\ql \fi-435\li420\ri0\nowidctlpar\aspalpha\faauto\rin0\lin420\itap0 {\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 1.\tab }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 Make a }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 public_html}{
\insrsid13651041 \hich\af0\dbch\af13\loch\f0  directory in your sorrel account, and set its permissions to be  }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 7}{\b\insrsid267976 \hich\af0\dbch\af13\loch\f0 11}{\insrsid13651041 
\hich\af0\dbch\af13\loch\f0 . Make a }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 cgi-bin}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  directory in your new }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 public_html }{\insrsid13651041 
\hich\af0\dbch\af13\loch\f0 account, and set its permissions to be }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 7}{\b\insrsid267976 \hich\af0\dbch\af13\loch\f0 1\hich\af0\dbch\af13\loch\f0 1}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 , also. If you
\hich\af0\dbch\af13\loch\f0  have any trouble setting this up, ASK --- that's why this is part of the lab exercise!}{\b\insrsid13651041 
\par }{\insrsid13651041 
\par }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 2.\tab }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 Create a simple web page }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 480perl.html}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  within your}{
\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0  public_html}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  directory on sorrel to contain links to the HTML pages you will be creating:}{\b\insrsid13651041 
\par }\pard\plain \ql \fi-330\li690\ri0\nowidctlpar\aspalpha\faauto\rin0\lin690\itap0 \fs20\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\b\insrsid13651041 
\par }\pard \ql \li855\ri0\nowidctlpar\aspalpha\faauto\rin0\lin855\itap0 {\b\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2 <html>
\par 
\par \hich\af5\dbch\af0\loch\f2 <head>
\par \hich\af5\dbch\af0\loch\f2 <title> C\hich\af5\dbch\af0\loch\f2 IS 480 - Perl in Depth - Fall 2004 </title>
\par \hich\af5\dbch\af0\loch\f2 </head>
\par 
\par \hich\af5\dbch\af0\loch\f2 <body>
\par \hich\af5\dbch\af0\loch\f2 <h3 align=center>
\par }{\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2 type in your name here}{\b\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2  <br>
\par \hich\af5\dbch\af0\loch\f2 CIS 480 - Perl in Depth <br>
\par \hich\af5\dbch\af0\loch\f2 Fall 2004 <br>
\par \hich\af5\dbch\af0\loch\f2 </h3>
\par 
\par \hich\af5\dbch\af0\loch\f2 <hr>
\par 
\par \hich\af5\dbch\af0\loch\f2  Last modified: }{\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2 insert current date}{\b\f2\insrsid13651041 
\par 
\par }{\b\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2 <hr>
\par 
\par \hich\af5\dbch\af0\loch\f2 <ul>
\par 
\par \hich\af5\dbch\af0\loch\f2 <!-- this is an HTML comment --- it does not show! -->
\par \hich\af5\dbch\af0\loch\f2 <!-- you will always put the LATEST work up here, so that -->
\par \hich\af5\dbch\af0\loch\f2 <!-- the list of works is in REVERSE order                -->
\par }{\b\f2\insrsid13651041 
\par }{\b\loch\af2\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f2 <li> Week 9 Lab Exercise
\par \hich\af5\dbch\af0\loch\f2      <ul>
\par \hich\af5\dbch\af0\loch\f2      <li> <a href="lab09_1.html"> lab09_1\hich\af5\dbch\af0\loch\f2  </a>
\par \hich\af5\dbch\af0\loch\f2      <li> <a href="lab09_2.html"> lab09_2 </a>
\par \hich\af5\dbch\af0\loch\f2      </ul>
\par 
\par \hich\af5\dbch\af0\loch\f2 </ul>
\par 
\par \hich\af5\dbch\af0\loch\f2 <hr>
\par 
\par \hich\af5\dbch\af0\loch\f2 </body>
\par 
\par \hich\af5\dbch\af0\loch\f2 </html>
\par 
\par }\pard \ql \li480\ri0\nowidctlpar\aspalpha\faauto\rin0\lin480\itap0 {\fs24\hich\af5\dbch\af0\insrsid13651041 \hich\af5\dbch\af0\loch\f0 This page will, of course, need to be world-readable.
\par }\pard\plain \s15\ql \fi-435\li420\ri0\nowidctlpar\aspalpha\faauto\rin0\lin420\itap0 \fs24\cf1\lang1033\langfe255\loch\af0\hich\af0\dbch\af13\cgrid\langnp1033\langfenp255 {\b\insrsid13651041 
\par \hich\af0\dbch\af13\loch\f0 3.\tab }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 Create an HTML page}{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0  lab09_1.html }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
with a form containing a button and your name. Write a Perl CGI script }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 lab09_1.pl }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
that simply returns a simple HTML greeting page of your choice (that also somehow includes your name) when that button is pushed.}{\b\insrsid13651041 
\par }{\insrsid13651041 
\par \tab \hich\af0\dbch\af13\loch\f0 Remember, you should place }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 lab09_1.html}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  in\hich\af0\dbch\af13\loch\f0  your }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
public_html}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  directory, and you should place }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 lab09_1.pl }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 in your }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
public_html/cgi-bin }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 directory. 
\par 
\par \tab \hich\af0\dbch\af13\loch\f0 NOTE: Because this is course work, the permissions for the }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 lab09_1.pl}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  script need to be }{\b\insrsid13651041 
\hich\af0\dbch\af13\loch\f0 711}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 , NOT }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 755 }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 (we do not want this particular script to be world-r
\hich\af0\dbch\af13\loch\f0 eadable). You may lose points if this script is world-readable.
\par 
\par }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 4.\tab }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 Create an HTML page}{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0  lab09_2.html }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
with at least 2 text fields, at least 1 password field, and a button. Then create a Perl CGI script}{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0  lab09_2.pl }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 that will print back a simple HTML page echo
\hich\af0\dbch\af13\loch\f0 ing back the values entered into the text fields in a readable manner (but NOT the value put into the password field...) when the button is pushed.}{\b\insrsid13651041 
\par }{\insrsid13651041 
\par \tab \hich\af0\dbch\af13\loch\f0 Again, NOTE: Because this is course work, the permissions for the }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 lab09_2.pl}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0  script ALSO need to be }{\b\insrsid13651041 
\hich\af0\dbch\af13\loch\f0 711}{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 , N\hich\af0\dbch\af13\loch\f0 OT }{\b\insrsid13651041 \hich\af0\dbch\af13\loch\f0 755 }{\insrsid13651041 \hich\af0\dbch\af13\loch\f0 
(we do not want this particular script to be world-readable). You may lose points if this script is world-readable.
\par \hich\af0\dbch\af13\loch\f0  
\par \hich\af0\dbch\af13\loch\f0 (Note: you can make these more elaborate if you'd like, although that is not required! 8-) )
\par 
\par }\pard \s15\ql \li0\ri0\nowidctlpar\aspalpha\faauto\rin0\lin0\itap0 {\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 When you believe these are working, a\hich\af0\dbch\af13\loch\f0 
dd you name to the "NEXT" list on the board. When it is your turn, I will come and try your scripts starting}{\b\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0  }{\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 from your name link on the page }{
\b\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 http://www.humboldt.edu/~st10/f04cis480perl/480student_pages.html}{\fs22\insrsid13651041 \hich\af0\dbch\af13\loch\f0 . If, by the end of lab, they run from there and m\hich\af0\dbch\af13\loch\f0 
eet the above specifications, then you will have met the requirements for this lab exercise.}{\b\fs22\insrsid13651041 
\par }}