#!/usr/bin/perl foreach (keys %ENV){ print "$_ = $ENV{$_}\n" if (/LANG/); }