R
robin
I do have a contrubution it's called:
#!/usr/bin/perl
my $c=0; my @key;
my $key;
foreach ( sort %ENV)
{
$key= join ("=", %ENV);
@key = split (/=/, $key);
print "key=$key[$c]\n\n";
print "value=$key[$c+1]\n\n---";
++$c;
}
#!/usr/bin/perl
my $c=0; my @key;
my $key;
foreach ( sort %ENV)
{
$key= join ("=", %ENV);
@key = split (/=/, $key);
print "key=$key[$c]\n\n";
print "value=$key[$c+1]\n\n---";
++$c;
}