
Paul
Enthusiast
Feb 11, 2002, 8:52 AM
Views: 6381
|
|
Re: [localfilmmaker] GetComputerName
|
|
|
#!/usr/bin/perl -w use strict; print "Content-type: text/html\n\n"; print "<h1>ENV Vars:</h1>\n"; foreach (sort keys %ENV) { print "$_ = $ENV{$_}<br>\n"; } How about: print join("<BR>", map { "$_ = $ENV{$_}" } keys %ENV);
(This post was edited by WiredON.net on Feb 11, 2002, 8:53 AM)
|