#!/usr/bin/perl #-w # Trial and error #use warnings; #use strict; #my @keys = sort keys %ENV; #my @values = sort values %ENV; # connect keys and values #print sort values %ENV; print sort keys values %ENV; exit;