perl 환경 변수 출력

Case 1
#!/usr/bin/perl
use strict; use warnings;


  # 지정한, 특정 환경변수의 값 얻기
  my $s = $ENV{"PATH"};
  print $s, "\n";


  # 컴퓨터의 모든 환경 변수 출력하기
  foreach $_ (sort keys(%ENV)) {
    print "$_=$ENV{$_}\n";
  }


Case 2.
#!/usr/bin/perl

   use Config qw(myconfig config_sh config_vars);
   use strict;

   print myconfig();

   print config_sh();