Help for this page

Select Code to Download


  1. or download this
    #!/usr/local/bin/perl -wT
use strict;
...
      start_html( -title => 'Test program' ),
      h1( 'Hello world' ),
      end_html;
  2. or download this
    my $table = $dbh->prepare qq'
CREATE TABLE players
(realname CHAR(20),
=
gold CHAR(40))');
  3. or download this
    my $table = $dbh->prepare( qq'
CREATE TABLE players
(realname CHAR(20),
 gold CHAR(40))');
  4. or download this
    create table players
(
...
    lastlast  VARCHAR(20),
    gold      INTEGER
);