cgi-dev

Repository that serves as my CGI "scratchpad" to try things out.
git clone git://git.samirparikh.com/cgi-dev
Log | Files | Refs | README

commit f388415bc93a5d48563903b5bbc3dd3c3ccabf77
parent 663127de306e090d7135cf7c7389fe8439eb7a26
Author: Samir Parikh <noreply@samirparikh.com>
Date:   Sat, 19 Feb 2022 16:00:33 +0000

update html table formatting

Diffstat:
Mguess_number.cgi | 14++++++++------
1 file changed, 8 insertions(+), 6 deletions(-)

diff --git a/guess_number.cgi b/guess_number.cgi @@ -110,12 +110,12 @@ sub print_status { print $game->table( { -border=>"0", -width=>"50%" }, $game->Tr( - $game->td( "Game #: ", $state->{GAMENO} ), - $game->td( "Wins: ", $state->{WON} ) + $game->td( $game->b("Game #: "), $state->{GAMENO} ), + $game->td( $game->b("Wins: "), $state->{WON} ) ), $game->Tr( - $game->td( "Guesses Left: ", $state->{GUESSES_LEFT} ), - $game->td( "Numbers Guessed: ", $state->{GUESSED} ) + $game->td( $game->b("Guesses Left: "), $state->{GUESSES_LEFT} ), + $game->td( $game->b("Numbers Guessed: "), $state->{GUESSED} ) ) ); print $game->h2( $game->font( {-color => 'red'}, $message )) @@ -154,9 +154,11 @@ sub show_guess_form { sub print_footer { print $game->hr; print $game->p( - #{ -style => "fontsize: 10pt" }, 'inspired by Hangman game from ', - 'Writing Apache Modules with Perl and C', + $game->a( + { -href => "https://www.oreilly.com/library/view/writing-apache-modules/156592567X/"}, + $game->i( 'Writing Apache Modules with Perl and C') + ), ' by Lincoln Stein and Doug MacEachern.' ); print $game->end_html();