如何取得执行perl程序的用户名?

如何取得执行perl程序的用户名?

如何取得执行perl程序的用户名?
写了一个perl程序,想在log里记录都有谁执行过这个程序,怎样获得执行它的用户的用户名?
`whoami`.