Beefy Boxes and Bandwidth Generously Provided by pair Networks kudra
Syntactic Confectionery Delight
 
PerlMonks  

Re: if table exists (DBI)

by HelenCr (Monk)
on Apr 26, 2013 at 15:26 UTC ( #1030857=note: print w/ replies, xml ) Need Help??


in reply to if table exists (DBI)

Although this thread is 11 years old, since this is a basic question, then for the benefit of PerlMonks users, here is the "right and efficient" answer (in my opinion):

for MS SQL Server:

(Assume the table name you are testing for existence is in variable $table_name):

my $query = "IF EXISTS(SELECT * FROM sys.tables WHERE type = 'U' AND +name = '$table_name') SELECT 1 ELSE SELECT 0"; my $sth = $dbh->prepare( $query ); $sth->execute; my $result = $sth->fetchrow_array;

$result should be 1 if $table_name exists in the database, and vice versa.

Helen


Comment on Re: if table exists (DBI)
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1030857]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (13)
As of 2014-04-17 14:38 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (450 votes), past polls