Help for this page

Select Code to Download


  1. or download this
    my $stmt = "SELECT * FROM table WHERE ...
#execute...
...
my $template = HTML::Template->new( filename => 'some.tmpl' );
$template -> param( events => \@events );
#etc...
  2. or download this
    $events[$ctr]{'col1'} = $sqldata->[$i]{'col1');
$events[$ctr]{'col2'} = $sqldata->[$i]{'col2');
$events[$ctr]{'col3'} = $sqldata->[$i]{'col3');
$ctr++;