>From: "Paul J. Schinder" <schinder@pobox.com> >To: Milivoj Ivkovic <mi@alma.ch>, macperl@macperl.org >Subject: Re: [MacPerl] Find SMTP server(s): nslookup? >Date: Thu, Apr 1, 1999, 9:05 AM > > At 12:53 PM +0200 4/1/99, Milivoj Ivkovic wrote: > > } > > } >use Mac::InternetConfig; > } >print $InternetConfig{kICSMTPHost}; > } > } If it's that easy, it should be integrated into Net::DNS. Even if it > }doesn't work on all Macs, it doesn't cost a lot to try... > > It's not that easy. That little snippet does not work for me, and I > certainly have Internet Config, with a setting for the SMTP server. It > comes built into the latest versions of MacOS, including the one I'm using. > It may be that Mac::InternetConfig can't deal with the new Internet Config > (it changed even before being incorporated into the OS, the one that ships > with MacPerl is old). I made a mistake in that code, the code should be: use Mac::InternetConfig; print $InternetConfig{kICSMTPHost()}; > } > } >If you want to send e-mail, then you can just use Net::SMTP, which is in > } >libnet. It automatically gets the data from InternetConfig, including SMTP > } >host, SMTP username, SMTP password, and others. > } > } No need for a password for SMTP, but if the user's e-mail address is > }there too, that's interesting. What would the key be? > >>From the docs, the email address seems to be kICEmail. > > > > ----- > Paul J. Schinder > schinder@pobox.com > > ===== Want to unsubscribe from this list? > ===== Send mail with body "unsubscribe" to macperl-request@macperl.org > > ===== Want to unsubscribe from this list? ===== Send mail with body "unsubscribe" to macperl-request@macperl.org