如何用Perl脚本连接容器化Oracle 12c？遇ORA-12154错误求助

Hey, let's break down why you're hitting that ORA-12154: TNS:could not resolve the connect identifier specified error and how to fix it. I've run into this exact issue with containerized Oracle and Perl DBI, so here's what's going wrong:

The Root Causes #

Your setup has two main mismatches plus a potential environment variable gap:

1. Your Perl script's connection string doesn't align with the TNS alias you defined.
2. The Perl container might not know where to find your tnsnames.ora file.
3. You need to confirm network connectivity between the two containers.

Step-by-Step Fixes #

1. Update the Perl Connection String #

You have two solid options here, depending on whether you want to use your tnsnames.ora or skip it entirely:

Option A: Use the Easy Connect Format (No TNS File Needed)

This bypasses tnsnames.ora entirely by specifying the host, port, and service name directly in the connection string. Replace your connect line with this:

my $dbh = DBI->connect('dbi:Oracle://oracle:1522/ORCLCDB', 'books_admin', 'MyPassword') or die "Cannot connect to DB => " . DBI->errstr;

This tells DBI exactly where to reach the Oracle container (oracle host, port 1522) and which service to target (ORCLCDB).

Option B: Use Your TNS Alias (Requires TNS_ADMIN Setup)

Your tnsnames.ora defines an alias ORAC that points to your ORCLCDB service. To use this alias, first make sure the Perl container knows where your tnsnames.ora lives, then update the connection string to use ORAC:

my $dbh = DBI->connect('dbi:Oracle:ORAC', 'books_admin', 'MyPassword') or die "Cannot connect to DB => " . DBI->errstr;

2. Set the TNS_ADMIN Environment Variable #

If you go with Option B, the Perl container needs to know the path to your tnsnames.ora file. You can set this in a few ways:

• Run-time: Before executing your script, run this command in the Perl container:

  export TNS_ADMIN=/path/to/directory-containing-tnsnames.ora
  

• Dockerfile: Add this line to your Perl container's Dockerfile to set it permanently:

  ENV TNS_ADMIN=/path/to/directory-containing-tnsnames.ora
  

3. Verify Network Connectivity #

Double-check that the Perl container can reach the Oracle container:

• Ping the Oracle host to confirm DNS resolution:

  ping oracle
  

• Test if the port is open:

  nc -zv oracle 1522
  

If either of these fail, you'll need to fix your container networking (make sure both are on the same Docker network, for example).

4. Quick Oracle Side Check #

Just to be thorough, confirm that the ORCLCDB service is registered with the listener on port 1522 in your Oracle container. You can run this command inside the Oracle container:

lsnrctl status LISTENER_ORAC

Look for a line like Service "ORCLCDB" has 1 instance(s). to confirm it's registered.

内容的提问来源于stack exchange，提问作者Pratheesh