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