1. Output the quotation list:

    print "Content-type: text/html\n\n";

    print "<h1>A list of presidential quotations:</h1>\n";

    while($sth->fetch()) {

    print "specify variable for president's first name here";

    print "$middle " if ($middle);

    print "specify variable for president's last name here: ";

    print "\"specify variable for quotation here\"<p>\n";

    }

    TIP: The print command uses quotation marks to specify what to print: In Perl, text strings are enclosed in quotation marks.

    So to make sure each president's quotation appears within quotation marks when it shows up in the browser, you put an escape character     (\) before the quotes:

    \"

    This ensures that the quotation marks will appear in the browser: