Perl III Problem Set:

1.  Create a script that divides two numbers provided on the command line.
	Two numbers are required.
	Numbers have to be positive.
	Divisor cannot be zero.

        This part you do in Perl
        ========================
	Write the quotient to STDOUT
	Write any errors to STDERR

        This part you do on the command line in UNIX
        ============================================
	Redirect STDOUT to an output file (out.txt)
	Redirect STDERR to an error file (err.txt)


2. Open a file using the open function.
	Make all the letters in each line uppercase. (There's a built-in
    Perl function which will do this.)
	Write out to a new file that was created using the open function.

3. Open the provided fasta file. Print the reverse complement of each
    sequence. Make sure to print the output in fasta format including
    the sequence name and a note in the description that this is the
    reverse complement. Print to STDOUT and capture the ouput with a 
    command line redirect '>'.

4. Open the provided fastq file. Go thru each line of the file. Count
    the number of lines and the number of characters per line.
    Report the:
         a. total number of lines
         b. total number of characters
         c. the average line length 

5. Create a script that uses <> to take in the contents of the provided
    text file. Use the function index to
      a. find the first position of 'Nobody' on every line
      b. find the first position of 'somebody' on every line
    Use the warn() function to warn the user that 'somebody is here'