Help for this page

Select Code to Download


  1. or download this
    ...
my $info = $query->param('info');
$info =~ s/\n/<p>/g;
my $sql = sprintf "insert into test values(%s)", $dbh->quote($info);
$dbh->do($sql) || die;
...
  2. or download this
    Hello,

This is a test.

Bye Bye.
  3. or download this
    test=> select * from test;
                     stuff                     
-----------------------------------------------
<p>Bye Bye.a test.
(1 row)