Re: [PERL] Arrays igen!

["Nils Lastein" <sslug@sslug>]

Prøv: @names = $dbh->tables;
Kig desuden på 'man DBI'...

nila

----- Original Message -----
From: "Kaare Rasmussen" <sslug@sslug>
To: <sslug@sslug>
Sent: Saturday, January 27, 2001 2:23 PM
Subject: Re: [PERL] Arrays igen!


> > Hvordan er syntaxen for at se hvor mange tabeller der er i en given db?
>
> #!/usr/bin/perl
> use DBI;
>
> $dbname = "test";
> $db = DBI->connect("dbi:Pg:dbname=$dbname")
>   or die("Unable to connect to $dbname");
>  @tables = $db->tables;
>  foreach $t (@tables) {
>   print "$t\n";
>  }
>
>
> --
> Kaare Rasmussen            --Linux, spil,--        Tlf:        3816 2582
> Kaki Data                tshirts, merchandize      Fax:        3816 2501
> Howitzvej 75               Åben 14.00-18.00        Email: sslug@sslug
> 2000 Frederiksberg        Lørdag 11.00-17.00       Web:      www.suse.dk
>