Làm cách nào để đặt biến Windows PATH từ Perl?

Question

Tôi cần đặt biến môi trường từ bên trong Perl. Lý tưởng nhất, tôi cần phải truy vấn một biến và sau đó thay đổi nó nếu nó không phải là những gì được yêu cầu. Cụ thể là biến PATH mà tôi muốn thay đổi.

Làm cách nào để nhận và đặt các biến này?

Answer 1

Nếu bạn cần thay đổi các biến môi trường trên toàn cầu và vĩnh viễn, như nếu bạn đặt nó trong bảng điều khiển, sau đó bạn phải muck with the registry (Cập nhật: và bây giờ có các mô-đun để thực hiện việc này, Win32::Env và Win32::Env::Path). Lưu ý rằng việc thay đổi các biến trong đăng ký và "phát sóng" thay đổi sẽ không thay đổi các biến môi trường trong một số quy trình hiện tại, đặc biệt là perl.exe và cmd.exe.

Nếu bạn chỉ muốn thay đổi quy trình hiện tại (và sau đó sinh ra quy trình con), thì biến số băm% ENV toàn cầu là những gì bạn muốn (ví dụ: $ ENV {PATH}). Xem perldoc perlvar.

Answer 2

$ ENV {PATH}?

Hãy nhớ rằng các biến môi trường chỉ ảnh hưởng đến các quy trình con. Bạn không thể chạy chương trình Perl, thay đổi% ENV và sau đó thấy thay đổi đó trong tiến trình cha - môi trường không hoạt động theo cách đó.

Answer 3

Bạn có thể làm điều đó bằng cách sử dụng %ENV băm

$ENV{PATH} = 'C:\\Windows\;D:\\Programs';