Select Code to Download

if (<some variable> eq "CREATE TABLE")
{
              Do IF-ELSE statements;
}

#!/usr/bin/perl -w

...

close(OUT) || die "Unable to close OUT file: $!\n";
close(FILE) || die "Unable to close file: $!\n";