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/