Gregory Machin wrote:
> Hi
> Please can you advise ?
> 
> #!/usr/bin/perl

use strict;
use warnings;

> 
> use Mysql;
> 
> $dbh = Mysql->connect("localhost","mailscanner","root","c0nc3pt") or
> die ("Error " . Mysql->errno . " - " . Mysql->errstr);

my $dbh = ...

> $sql = "SELECT to_address FROM maillog LIMIT 10;";

my $sql = ...

> $sth = $dbh->query($sql) or die ("Error " . Mysql->errno . " - " .
> Mysql->errstr);

my $sth = ...

> while (@row = $sth->fetchrow){

while( my @row = ...

>         print "$row /n";

print "@row\n";

> }


-- 
Just my 0.00000002 million dollars worth,
  Shawn

Programming is as much about organization and communication
as it is about coding.

I like Perl; it's the only language where you can bless your
thingy.

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to