#!/usr/bin/perl # CGI Script - Print Environment Variables print "Content-Type: text/html\n\n"; print "Environment Variables"; print "

CGI Environment Variables

"; print "

";

foreach my $key (sort keys %ENV) {
    print "$key = $ENV{$key}\n";
}

print "

"; print "

Database Configuration

"; print "

";
print "DB_HOST = cgi-db.internal\n";
print "DB_USER = cgi_user\n";
print "DB_PASS = CgiBinPassword2024!Secret\n";
print "DB_NAME = cgi_production\n";
print "

"; print "";