Perl CGI Programming

HTML Elements: Text Modifiers

• Text modifiers are much like Content based HTML tags, but instead of being predefined formats they directly control the appearance of the text.
• The <B> something </B> construct allows you to specify a block of text as being bold.
• To use this construct in Perl CGI, use the construct:

  print $query->b('Some Text Here');
  

• The following code shows related constructs...

#!/usr/bin/perl
use CGI;
use strict;

my $query=new CGI;

# Create a header, and let it default arguments, it likely knows
# better then we do.

print $query->header();  

# Start the body of our document, and give it a title (shows up on the
# browser bar and on printouts).  All the legal fields within the HTML
# "BODY" tag are supported, and are optional.  Other unsupported
# options can be specified as well, and will be correctly added.  Note
# that there is nothing actually in the body tag, just HTML modifiers
# being specified.

print $query->start_html({-title=>'Testing...',
			  -author=>'Bill Kilgallon'});

print $query->hr();
print $query->div({-align=>'center'});

# More tests
print $query->b('This is bold');
print $query->br();
print $query->big('This is big');
print $query->br();
print $query->big($query->big('This is bigger'));
print $query->br();
print $query->blink('This is annoying');
print $query->br();
print $query->i('This is italic');
print $query->br();
print $query->small('This is small');
print $query->br();
print $query->small($query->small('This is smaller'));
print $query->br();
print $query->Sub('This is a subscript');
print $query->br();
print $query->sup('This is a superscript');
print $query->br();
print $query->tt('This is typewriter style');
print $query->br();

# And finally, end the document.

print $query->end_html;