7 lines
81 B
Perl
7 lines
81 B
Perl
|
use Env qw(PATH HOME);
|
||
|
|
|
||
|
|
$path2 = $PATH;
|
||
|
|
$path2 =~ tr/:/\n/;
|
||
|
|
|
||
|
|
print $path2;
|