Safari Books Online is a digital library providing on-demand subscription access to thousands of learning resources.
Perl provides several facilities for finding out information about the user and machine that you are running on. These functions are provided via Win32 extensions (see Appendix B, for more information).
To retrieve the name of the user executing the script, use the Win32::LoginName function: