Mega Code Archive

 

Categories / Perl / System Functions

 

Use Env qw(PATH HOME)

use Env qw(PATH HOME); $path2 = $PATH; $path2 =~ tr/:/\n/; print $path2;