I am trying to modify a script I have. The script will
convert a list of entries in txt file into an HTML
file.
The following will print out any alphabetical letters
which have entries. Now that I have only entries
under three letters, C, H, and S. I would like to
print them out as Congress, House, and Senate.
Any way to simply modify this section to achieve that?
Thank you for any help you can provide.
Yuan Yao
Congressional Research Service
Library of Congress
>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>
#INSERT INFORMATION INTO EACH ALPHABETIC GROUP.
my($alpha,$subj);
foreach $alpha (@alphagroup) { #output for letters
used in input
print OUT "<A NAME=\"$alpha\">\n<FONT
COLOR=\"#000066\"><H2>- $alpha -</H2>
</FONT>\n</A>\n";
foreach $subj (sort my_sort keys %ahash) {
if ($subj =~ /^HASH/) {
next;
}
if ($subj=~ /^$alpha/i) {
print OUT "<b>$subj</b>\n",$ahash{$subj},"\n";
print OUT <<EOM;
<A HREF="#aleph"><font size=-1><b>back to
top</b></font></A></p>
</font>
</div>
EOM
}
}
}
____________________________________________________________________________________
Do you Yahoo!?
Everyone is raving about the all-new Yahoo! Mail beta.
http://new.mail.yahoo.com
