#!/usr/bin/perl -w use strict; use CGI qw(:standard); use CGI::Carp qw(warningsToBrowser fatalsToBrowser); print header; print start_html("Environment"); foreach my $key (sort(keys(%ENV))) { print "$key = $ENV{$key} \n"; } print end_html;
import java.util.Map; // ... Map<string,> env = System.getenv(); System.out.format("Environment variables:%n"); for (String envName : env.keySet()) { System.out.format("\t%s=%s%n", envName, env.get(envName)); }
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)