Language Basics Perl

  1. Home
  2. Perl
  3. Language Basics
  4. The environment associative array
#!/usr/bin/perl -w
# Access environment variables.
@key_names = keys(%ENV);
print "Key names are: @key_names\n\n";
# Now, access each element from the list.
foreach $key (@key_names) {
    print "$key=$ENV{$key}\n";
}