diff options
| author | Alan Harder <Alan.Harder@Ebay.Sun.COM> | 1998-12-23 06:54:19 -0800 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1998-12-28 07:37:16 +0000 |
| commit | 1fa0e54f2e0b168f2a77a752f92064a58da05ee4 (patch) | |
| tree | a76c68852f82b6ab05a8909fd1625bf14b5df419 /pod | |
| parent | 433acd8a47ae1642ba234baa73b43933be6a53e5 (diff) | |
| download | perl-1fa0e54f2e0b168f2a77a752f92064a58da05ee4.tar.gz | |
perlfaq9 minor error
To: perlbug@perl.com
Message-Id: <199812232254.OAA05986@moshpit.EBay.Sun.COM>
p4raw-id: //depot/cfgperl@2501
Diffstat (limited to 'pod')
| -rw-r--r-- | pod/perlfaq9.pod | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pod/perlfaq9.pod b/pod/perlfaq9.pod index 330158b77b..1a5e61feee 100644 --- a/pod/perlfaq9.pod +++ b/pod/perlfaq9.pod @@ -387,7 +387,7 @@ Sys::Hostname module (which is part of the standard perl distribution), you can probably try using something like this: use Sys::Hostname; - $address = sprintf('%s@%s', getpwuid($<), hostname); + $address = sprintf('%s@%s', (getpwuid($<))[0], hostname); Company policies on mail address can mean that this generates addresses that the company's mail system will not accept, so you should ask for |