Accessing TCPIP.DATA from Perl on os390

--001a11402b48941cd8054ebb1527
Content-Type: text/plain; charset=UTF-8

All,

Is it possible to access the content of TCPIP.DATA and GLOBALTCPIPDATA from
a Perl script?

Where do these files live? Are they readable and parseable?

Alternatively, is there some easy way of interrogating the OS to find the
value associated with an individual parameter name?

I am specifically interested in finding the local DNS nameserver addresses,
searchlist, etc. to provide the default values for Net::DNS so that it
works the same way on all supported platforms.

Any help you can provide would be much appreciated, an example, even better.

P.S. I know next to nothing about MVS, so have a strong preference for
succinct and straightforward answers.


Dick Franks
________________________

--001a11402b48941cd8054ebb1527
Content-Type: text/html; charset=UTF-8
Content-Transfer-Encoding: quoted-printable

<div dir=3D"ltr"><div><div><div><div><div><div>All,<br><br></div>Is it poss=
ible to access the content of TCPIP.DATA and GLOBALTCPIPDATA from a Perl sc=
ript?<br><br></div>Where do these files live? Are they readable and parseab=
le?<br><br></div>Alternatively, is there some easy way of interrogating the=
 OS to find the value associated with an individual parameter name?<br><br>=
</div>I
 am specifically interested in finding the local DNS nameserver=20
addresses, searchlist, etc. to provide the default values for Net::DNS=20
so that it works the same way on all supported platforms.<br><br></div>Any =
help you can provide would be much appreciated, an example, even better.<br=
><br></div>P.S. I know next to nothing about MVS, so have a strong preferen=
ce for succinct and straightforward answers.<br><br><br clear=3D"all"><div>=
<div class=3D"m_-2514824133157951309m_-8690520156766544074gmail_signature">=
<div dir=3D"ltr">Dick Franks<br><span><font color=3D"#888888">_____________=
___________<br>
</font></span><br></div></div></div>
</div>

--001a11402b48941cd8054ebb1527--