अक्षम विदेशी कुंजी की जांच को हटाने InnoDB टेबल पर्ल स्क्रिप्ट

Question

Am काफी MySQL और पर्ल में कुल नौसिखिया का उपयोग कर, लेकिन करने के लिए नए मुझे बाहर मदद करने के लिए किसी और स्क्रिप्ट को हैक करने की कोशिश कर रहा हूँ। मुझे here से स्क्रिप्ट मिली। यह अब तक बहुत अच्छा लग रहा है लेकिन यह विफल रहता है क्योंकि तालिकाओं में कुछ विदेशी कुंजी जांच चल रही है। मैं phpmyadmin के माध्यम से जाने के लिए और कोशिश करते हैं और उन्हें एक एक करके सभी को हटाकर उसकी जगह लेकिन यह करने के लिए होने की हमेशा के लिए ले जाता है और मेरी तीसरी बार है सकता है इस :(मेरा क्वेरी है, इस स्क्रिप्ट शामिल करने के लिए ammended जा सकता है:

`SET FOREIGN_KEY_CHECKS = 0; 

इससे पहले कि यह ड्रॉप तालिका आदेश चलाता है? मैं के माध्यम से स्क्रिप्ट का पालन करने की कोशिश की लेकिन स्क्रिप्ट (शायद अज्ञान/समझ की कमी के कारण) का एक निश्चित आदेश हिस्सा नहीं मिल सका। किसी भी मदद की बहुत सराहना।

#!/usr/bin/perl 

use strict; 
use DBI; 

my $hostname = ''; 
my $database = ''; 
my $username = ''; 
my $password = ''; 

my $dbh = DBI->connect("dbi:mysql:${database}:$hostname", 
    $username, $password) or die "Error: $DBI::errstr\n"; 

my $sth = $dbh->prepare("SHOW TABLES"); 
$sth->execute or die "SQL Error: $DBI::errstr\n"; 
my $i = 0; 
my @all_tables =(); 
while(my $table = $sth->fetchrow_array) 
{ 
    $i++; 
    print "table $i: $table\n"; 
    push @all_tables, $table; 
} 
my $total_table_count = $i; 

print "Enter string or regex to match tables to " 
    . "delete (won't delete yet): "; 
my $regex = <STDIN>; 
chomp $regex; 

$i = 0; 
my @matching_tables =(); 
foreach my $table (@all_tables) 
{ 
    if($table =~ /$regex/i) 
    { 
    $i++; 
    print "matching table $i: $table\n"; 
    push @matching_tables, $table; 
    } 
} 
my $matching_table_count = $i; 

if($matching_table_count) 
{ 
    print "$matching_table_count out of $total_table_count " 
    . "tables match, and will be deleted.\n"; 
    print "Delete tables now? [y/n] "; 
    my $decision = <STDIN>; 
    chomp $decision; 

    $i = 0; 
    if($decision =~ /y/i) 
    { 
    foreach my $table (@matching_tables) 
    { 
     $i++; 
     print "deleting table $i: $table\n"; 
     my $sth = $dbh->prepare("DROP TABLE $table"); 
     $sth->execute or die "SQL Error: $DBI::errstr\n"; 
    } 
    } 
    else 
    { 
    print "Not deleting any tables.\n"; 
    } 
} 
else 
{ 
    print "No matching tables.\n"; 
} 

Answer 1

सेटिंग FOREIGN_KEY_CHECKS value शून्य करने के लिए:

SET FOREIGN_KEY_CHECKS = 0; 

... ड्रॉप स्क्रिप्ट विदेशी कुंजी की कमी उदाहरण विस्तृत निष्क्रिय कर देगा से पहले। चूंकि आपके पास एक MySQL इंस्टेंस पर एक से अधिक कैटलॉग/डेटाबेस हो सकते हैं, इसलिए यह जोखिम किसी अन्य डेटाबेस-वार पर प्रभाव डालता है।

सामान्य आदत को हटाने/बच्चों से पहले माता-पिता तालिका से डेटा छोटा इन महत्वपूर्ण निर्भरता के क्रम में स्क्रिप्ट के लिए है,।