Jared: PPM> search Tie::Registry PPM> search Win32::Registry Packages available from http://ppm.ActiveState.com/cgibin/PPM/ppmserver.pl?urn:/ PPMServer: Win32-Registry-File [1.09] Perl interface to MS-Windows registry files. PPM>
Is 1.09 really what I want to install? Cary Millsap Hotsos Enterprises, Ltd. http://www.hotsos.com Upcoming events: - Hotsos Clinic, Dec 9-11 Honolulu - 2003 Hotsos Symposium on OracleR System Performance, Feb 9-12 Dallas - Jonathan Lewis' Optimising Oracle, Nov 19-21 Dallas -----Original Message----- Still Sent: Tuesday, October 29, 2002 9:35 AM To: Multiple recipients of list ORACLE-L In addition to BIshop's excellent response, be sure to install the latest version of Tie:Registry. The one that comes with ActiveState Perl doesn't work properly. The current version (as installed from ActiveState via PPM) is I believe 1.24. Just reinstall it. Jared On Tuesday 29 October 2002 01:53, Bishop Lewis wrote: > Here's something to read registry keys I used a while back. Obviously needs > the win32 module installed. > > use Win32::Registry; > > $terminal = $ARGV[0]; > > $HKEY_LOCAL_MACHINE->Connect ($terminal, $hNode) || die "Cannot connect to > $node"; > $hNode->Open ("SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Winlogon", > $hKey) || die "Cannot open registry !"; > $hKey->GetValues (\%values); > $hKey->Close (); > $hNode->Close (); > > foreach $value (keys(%values)) { > $RegType = $values{$value}->[1]; > $RegValue = $values{$value}->[2]; > $RegKey = $values{$value}->[0]; > if ($RegKey eq "DefaultUserName") {$username = $RegValue; > print "$RegValue\n"; > } > } > > > exit; > > Modify accordingly. HTH. > > Lewis Bishop > --- > Barclays Enable - ISS - E-NTRUST/Bexleyheath NT > Oracle Database Consultant > Watling Street, Bexleyheath, Kent, DA6 7RR (Mail Van R) > Phone : 020 8298 3418 > Mobile: 07950 380857 > Email : [EMAIL PROTECTED] > "Enabling Competitive Advantage for Barclays in IT and Business Processing" > > -----Original Message----- > Sent: 29 October 2002 08:43 > To: Multiple recipients of list ORACLE-L > > This header confirms that this email message has been swept for the > presence of computer viruses. > > Corporate IT > THE WOOLWICH > ---------------------------------------------------------------------- > Hello All, > I am writing an perl script. I cann't figure out and have been going > through the docs, but cann't find exactly what I need. > A way to access Oracle Parameters as they are set up in the Win2k > registary. I am specifically thinking of ORACLE_HOME. I do know how to > obtain an environmental variable/parameter with $ENV{}. > But the ORACLE_HOME is not an environmental parameter per se. > I have a workaround by setting it up in the enviroment, however I would > like to write this script with the aim at it being machine unspecific. > (Jared, hope you can answer me on this. Want to get a copy of your book, > unfortunately with the exchange rate and import taxes etc it will cost me > R590,00. Quiet a chunk of the ole budget, maybe early next year.) > Regards > Denham Eva > Oracle DBA > "UNIX is basically a simple operating system, but you have to be a genius > to understand the simplicity." > Dennis Ritchie. > _____ > > DISCLAIMER > This message is for the named person's use only. It may contain > confidential, proprietary or legally privileged information. No > confidentiality or privilege is waived or lost by any mistransmission. If > you receive this message in error, please immediately delete it and all > copies of it from your system, destroy any hard copies of it and notify the > sender. You must not, directly or indirectly, use, disclose, distribute, > print, or copy any part of this message if you are not the intended > recipient. TFMC, its holding company, and any of its subsidiaries each > reserve the right to monitor and manage all e-mail communications through > its networks. > Any views expressed in this message are those of the individual sender, > except where the message states otherwise and the sender is authorized to > state them to be views of any such entity. > _____ > > _____ > > This e-mail message has been scanned for Viruses and Content and cleared by > MailMarshal - For more information please visit > <http://www.marshalsoftware.com> www.marshalsoftware.com > _____ > > > ------_=_NextPart_001_01C27F2F.5CF0F180 > Content-Type: text/html > Content-Transfer-Encoding: quoted-printable > > <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 3.2//EN"> > <html xmlns:v=3D"urn:schemas-microsoft-com:vml" = > xmlns:o=3D"urn:schemas-microsoft-com:office:office" = > xmlns:w=3D"urn:schemas-microsoft-com:office:word" = > xmlns:st1=3D"urn:schemas-microsoft-com:office:smarttags" = > xmlns=3D"http://www.w3.org/TR/REC-html40"> > > <head> > <META HTTP-EQUIV=3D"Content-Type" CONTENT=3D"text/html; = > charset=3Dus-ascii"> > > > <meta name=3DProgId content=3DWord.Document> > <meta name=3DGenerator content=3D"Microsoft Word 10"> > <meta name=3DOriginator content=3D"Microsoft Word 10"> > <link rel=3DFile-List href=3D"cid:filelist.xml@;01C27F2F.66CF0930"> > <link rel=3DEdit-Time-Data href=3D"cid:editdata.mso@;01C27F2F.66CF0930"> > <!--[if !mso]> > <style> > v\:* {behavior:url(#default#VML);} > o\:* {behavior:url(#default#VML);} > w\:* {behavior:url(#default#VML);} > .shape {behavior:url(#default#VML);} > </style> > <![endif]--> > <title>Win2k Perl accessing Oracle Parameters?</title> > <o:SmartTagType = > namespaceuri=3D"urn:schemas-microsoft-com:office:smarttags" > name=3D"date"/> > <o:SmartTagType = > namespaceuri=3D"urn:schemas-microsoft-com:office:smarttags" > name=3D"time"/> > <o:SmartTagType = > namespaceuri=3D"urn:schemas-microsoft-com:office:smarttags" > name=3D"place"/> > <o:SmartTagType = > namespaceuri=3D"urn:schemas-microsoft-com:office:smarttags" > name=3D"PostalCode"/> > <o:SmartTagType = > namespaceuri=3D"urn:schemas-microsoft-com:office:smarttags" > name=3D"City"/> > <!--[if gte mso 9]><xml> > <o:OfficeDocumentSettings> > <o:DoNotRelyOnCSS/> > </o:OfficeDocumentSettings> > </xml><![endif]--><!--[if gte mso 9]><xml> > <w:WordDocument> > <w:SpellingState>Clean</w:SpellingState> > <w:GrammarState>Clean</w:GrammarState> > <w:DocumentKind>DocumentEmail</w:DocumentKind> > <w:EnvelopeVis/> > <w:BrowserLevel>MicrosoftInternetExplorer4</w:BrowserLevel> > </w:WordDocument> > </xml><![endif]--><!--[if !mso]> > <style> > st1\:*{behavior:url(#default#ieooui) } > </style> > <![endif]--> > <style> > <!-- > /* Font Definitions */ > @font-face > {font-family:Tahoma; > panose-1:2 11 6 4 3 5 4 4 2 4; > mso-font-charset:0; > mso-generic-font-family:swiss; > mso-font-pitch:variable; > mso-font-signature:553679495 -2147483648 8 0 66047 0;} > /* Style Definitions */ > p.MsoNormal, li.MsoNormal, div.MsoNormal > {mso-style-parent:""; > margin:0cm; > margin-bottom:.0001pt; > mso-pagination:widow-orphan; > font-size:12.0pt; > font-family:"Times New Roman"; > mso-fareast-font-family:"Times New Roman";} > a:link, span.MsoHyperlink > {color:blue; > text-decoration:underline; > text-underline:single;} > a:visited, span.MsoHyperlinkFollowed > {color:blue; > text-decoration:underline; > text-underline:single;} > p > {mso-margin-top-alt:auto; > margin-right:0cm; > mso-margin-bottom-alt:auto; > margin-left:0cm; > mso-pagination:widow-orphan; > font-size:12.0pt; > font-family:"Times New Roman"; > mso-fareast-font-family:"Times New Roman";} > code > {font-family:"Courier New"; > mso-ascii-font-family:"Courier New"; > mso-fareast-font-family:"Times New Roman"; > mso-hansi-font-family:"Courier New"; > mso-bidi-font-family:"Courier New";} > span.EmailStyle20 > {mso-style-type:personal-reply; > mso-style-noshow:yes; > mso-ansi-font-size:10.0pt; > mso-bidi-font-size:10.0pt; > font-family:Arial; > mso-ascii-font-family:Arial; > mso-hansi-font-family:Arial; > mso-bidi-font-family:Arial; > color:navy;} > span.SpellE > {mso-style-name:""; > mso-spl-e:yes;} > span.GramE > {mso-style-name:""; > mso-gram-e:yes;} > @page Section1 > {size:595.3pt 841.9pt; > margin:72.0pt 90.0pt 72.0pt 90.0pt; > mso-header-margin:35.4pt; > mso-footer-margin:35.4pt; > mso-paper-source:0;} > div.Section1 > {page:Section1;} > --> > </style> > <!--[if gte mso 10]> > <style> > /* Style Definitions */=20 > table.MsoNormalTable > {mso-style-name:"Table Normal"; > mso-tstyle-rowband-size:0; > mso-tstyle-colband-size:0; > mso-style-noshow:yes; > mso-style-parent:""; > mso-padding-alt:0cm 5.4pt 0cm 5.4pt; > mso-para-margin:0cm; > mso-para-margin-bottom:.0001pt; > mso-pagination:widow-orphan; > font-size:10.0pt; > font-family:"Times New Roman";} > </style> > <![endif]--> > </head> > > <body lang=3DEN-GB link=3Dblue vlink=3Dblue = > style=3D'tab-interval:36.0pt'> > > <div class=3DSection1> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>Here's something to read registry > keys I used a while back. Obviously needs the win32 module = > installed.<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><span class=3DGramE><font size=3D2 color=3Dnavy = > face=3DArial><span > style=3D'font-size:10.0pt;font-family:Arial;color:navy'>use</span></font = > > ></span><font > > size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial; > color:navy'> Win32::Registry;<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$terminal =3D $<span = > class=3DGramE>ARGV[</span>0];<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$HKEY_LOCAL_MACHINE->Connect > ($terminal, $<span class=3DSpellE>hNode</span>) || die "Cannot = > connect to > $node";<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$<span = > class=3DSpellE>hNode</span>->Open > ("SOFTWARE\\Microsoft\\Windows NT\\<span = > class=3DSpellE>CurrentVersion\\Winlogon</span>", > $<span class=3DSpellE>hKey</span>) || die "Cannot open <span = > class=3DGramE>registry > !</span>";<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$<span = > class=3DSpellE>hKey</span>-><span > class=3DSpellE>GetValues</span> = > (\%values);<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$<span = > class=3DSpellE>hKey</span>->Close > ();<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>$<span = > class=3DSpellE>hNode</span>->Close > ();<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><span class=3DSpellE><span class=3DGramE><font = > size=3D2 > color=3Dnavy face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial; > color:navy'>foreach</span></font></span></span><font size=3D2 = > color=3Dnavy > face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial;color:navy'> $value > (keys(%values)) {<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span>$<span > class=3DSpellE>RegType</span> =3D $<span = > class=3DGramE>values{</span>$value}->[1];<o:p></o:p></span></font></p = > > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span>$<span > class=3DSpellE>RegValue</span> =3D $<span = > class=3DGramE>values{</span>$value}->[2];<o:p></o:p></span></font></p = > > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span>$<span > class=3DSpellE>RegKey</span> =3D $<span class=3DGramE>values{</span>$val= > ue}->[0];<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span><span > class=3DGramE>if</span> ($<span class=3DSpellE>RegKey</span> <span = > class=3DSpellE>eq</span> > "<span class=3DSpellE>DefaultUserName</span>") {$username =3D = > $<span > class=3DSpellE>RegValue</span>;<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span><span > class=3DGramE>print</span> "$<span = > class=3DSpellE>RegValue</span>\n";<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><span = > style=3D'mso-spacerun:yes'> </span>}<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'>}<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <p class=3DMsoNormal><span class=3DGramE><font size=3D2 color=3Dnavy = > face=3DArial><span > style=3D'font-size:10.0pt;font-family:Arial;color:navy'>exit</span></fon = > t></span><font > size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial; > color:navy'>;<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D2 color=3Dnavy face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial;color:navy'><o:p> </o:p></span></font></p> = > > > <div> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Modify accordingly. = > HTH.<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier = > New";color:navy;mso-no-proof:yes'><o:p> </o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Lewis = > Bishop<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier = > New";color:navy;mso-no-proof:yes'>---<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Barclays Enable - ISS - > E-NTRUST/Bexleyheath NT<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Oracle Database = > Consultant<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Watling Street, Bexleyheath, = > </span></font><st1:place><st1:City><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt; > font-family:"Courier = > New";color:navy;mso-no-proof:yes'>Kent</span></font></st1:City><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>, = > </span></font><st1:PostalCode><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt; > font-family:"Courier New";color:navy;mso-no-proof:yes'>DA6 = > 7RR</span></font></st1:PostalCode></st1:place><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'> (Mail Van = > R)<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Phone : 020 8298 = > 3418<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><st1:City><st1: = > place><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt; > font-family:"Courier = > New";color:navy;mso-no-proof:yes'>Mobile</span></font></st1:place></st1: = > City><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>: 07950 = > 380857<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>Email : = > [EMAIL PROTECTED]<o:p></o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-layout-grid-align:none;text-autospace:none'><font > size=3D2 color=3Dnavy face=3D"Courier New"><span = > style=3D'font-size:10.0pt;font-family: > "Courier New";color:navy;mso-no-proof:yes'>"Enabling Competitive = > Advantage > for Barclays in IT and Business = > Processing"<o:p></o:p></span></font></p> > > <p class=3DMsoNormal><font size=3D3 color=3Dnavy face=3D"Times New = > Roman"><span > style=3D'font-size:12.0pt;color:navy;mso-no-proof:yes'> </span></fo = > nt><o:p></o:p></p> > > </div> > > <p class=3DMsoNormal style=3D'margin-left:36.0pt'><font size=3D2 = > face=3DTahoma><span > lang=3DEN-US = > style=3D'font-size:10.0pt;font-family:Tahoma;mso-ansi-language:EN-US'>-- = > ---Original > Message-----<br> > <b><span style=3D'font-weight:bold'>From:</span></b> Denham Eva > [mailto:EvaD@;TFMC.co.za<span class=3DGramE>] <br> > <b><span style=3D'font-weight:bold'>Sent</span></b></span><b><span > style=3D'font-weight:bold'>:</span></b> </span></font><st1:date = > Month=3D"10" > Day=3D"29" Year=3D"2002"><font size=3D2 face=3DTahoma><span = > lang=3DEN-US > = > style=3D'font-size:10.0pt;font-family:Tahoma;mso-ansi-language:EN-US'>29 = > October > 2002</span></font></st1:date><font size=3D2 face=3DTahoma><span = > lang=3DEN-US > style=3D'font-size:10.0pt;font-family:Tahoma;mso-ansi-language:EN-US'> = > </span></font><st1:time > Hour=3D"8" Minute=3D"43"><font size=3D2 face=3DTahoma><span = > lang=3DEN-US > = > style=3D'font-size:10.0pt;font-family:Tahoma;mso-ansi-language:EN-US'>08 = > > :43</span></font></st1:time><font > > size=3D2 face=3DTahoma><span lang=3DEN-US = > style=3D'font-size:10.0pt;font-family:Tahoma; > mso-ansi-language:EN-US'><br> > <b><span style=3D'font-weight:bold'>To:</span></b> Multiple recipients = > of list > ORACLE-L<br> > <b><span style=3D'font-weight:bold'>Subject:</span></b> Win2k Perl = > accessing > Oracle Parameters?</span></font></p> > > <p class=3DMsoNormal style=3D'margin-left:36.0pt'><font size=3D3 > face=3D"Times New Roman"><span = > style=3D'font-size:12.0pt'><o:p> </o:p></span></font></p> > > <p class=3DMsoNormal = > style=3D'mso-margin-top-alt:0cm;margin-right:0cm;margin-bottom: > 12.0pt;margin-left:36.0pt'><code><font size=3D3 face=3D"Courier = > New"><span > style=3D'font-size:12.0pt;mso-ansi-font-size:12.0pt;mso-bidi-font-size:1 = > 2.0pt'>This > header confirms that this email message has been swept for = > the</span></font></code><font > face=3D"Courier New"><span style=3D'font-family:"Courier New"'><br> > <code><font face=3D"Courier New"><span = > style=3D'mso-ansi-font-size:12.0pt; > mso-bidi-font-size:12.0pt'>presence of computer viruses. = > </span></font></code><br> > <br> > <code><font face=3D"Courier New"><span = > style=3D'mso-ansi-font-size:12.0pt; > mso-bidi-font-size:12.0pt'>Corporate IT</span></font></code><br> > <code><font face=3D"Courier New"><span = > style=3D'mso-ansi-font-size:12.0pt; > mso-bidi-font-size:12.0pt'>THE WOOLWICH</span></font></code><br> > <code><font face=3D"Courier New"><span = > style=3D'mso-ansi-font-size:12.0pt; > mso-bidi-font-size:12.0pt'>--------------------------------------------- = > -------------------------</span></font></code></span></font><o:p></o:p>< = > /p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>Hello All,</span></font> <o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>I am writing an perl script. I cann't figure = > out and > have been going through the docs, but cann't find exactly what I = > need.</span></font><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>A way to access Oracle Parameters as they are = > set up > in the Win2k registary. I am specifically thinking of ORACLE_HOME. I do = > know > how to obtain an environmental variable/parameter with = > $ENV{}.</span></font><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>But the ORACLE_HOME is not an environmental = > parameter > per se.</span></font> <br> > <font size=3D2 face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial'>I have > a workaround by setting it up in the enviroment, however I would like = > to write > this script with the aim at it being machine = > unspecific.</span></font><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>(Jared, hope you can answer me on this. Want = > to get a > copy of your book, unfortunately with the exchange rate and import = > taxes etc it > will cost me R590,00. Quiet a chunk of the ole budget, maybe early next = > year.)</span></font><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D2 face=3DArial><span = > style=3D'font-size: > 10.0pt;font-family:Arial'>Regards</span></font> <br> > <b><i><font face=3DArial><span = > style=3D'font-family:Arial;font-weight:bold; > font-style:italic'>Denham Eva</span></font></i></b> <br> > <b><i><font size=3D2 face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial; > font-weight:bold;font-style:italic'>Oracle DBA</span></font></i></b> = > <br> > <i><font size=3D2 color=3Dblack face=3DArial><span = > style=3D'font-size:10.0pt; > font-family:Arial;color:black;font-style:italic'>"UNIX is = > basically a > simple operating system, but you have to be a genius to understand the > simplicity."</span></font></i> <br> > <i><font size=3D2 color=3Dblack face=3DArial><span = > style=3D'font-size:10.0pt; > font-family:Arial;color:black;font-style:italic'>Dennis = > Ritchie.</span></font></i> > <o:p></o:p></p> > > <div class=3DMsoNormal align=3Dcenter = > style=3D'margin-left:36.0pt;text-align:center'><strong><b > style=3D'mso-ansi-font-weight:normal;mso-bidi-font-weight:normal'><font = > size=3D3 > color=3D"#0000a0" face=3DArial><span = > style=3D'font-size:12.0pt;font-family:Arial; > color:#0000A0;font-weight:normal'> > > <hr size=3D2 width=3D"100%" align=3Dcenter> > > </span></font></b></strong></div> > > <p class=3DMsoNormal style=3D'margin-left:36.0pt'><strong><b><font = > size=3D2 > color=3D"#0000a0" face=3DArial><span = > style=3D'font-size:10.0pt;font-family:Arial; > color:#0000A0'>DISCLAIMER</span></font> </b></strong><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D1 face=3DArial><span = > style=3D'font-size: > 7.5pt;font-family:Arial'>This message is for the named person's use = > only. It > may contain confidential, proprietary or legally privileged = > information. No > confidentiality or privilege is waived or lost by any mistransmission. = > If you > receive this message in error, please immediately delete it and all = > copies of > it from your system, destroy any hard copies of it and notify the = > sender. You > must not, directly or indirectly, use, disclose, distribute, print, or = > copy any > part of this message if you are not the intended recipient. TFMC, its = > holding > company, and any of its subsidiaries each reserve the right to monitor = > and > manage all e-mail communications through its = > networks.</span></font><font > size=3D1><span style=3D'font-size:7.5pt'> </span></font><o:p></o:p></p> > > <p style=3D'margin-left:36.0pt'><font size=3D1 face=3DArial><span = > style=3D'font-size: > 7.5pt;font-family:Arial'>Any views expressed in this message are those = > of the > individual sender, except where the message states otherwise and the = > sender is > authorized to state them to be views of any such = > entity.</span></font><font > size=3D1><span style=3D'font-size:7.5pt'> </span></font><o:p></o:p></p> > > <div class=3DMsoNormal align=3Dcenter = > style=3D'margin-left:36.0pt;text-align:center'><font > size=3D3 face=3D"Times New Roman"><span style=3D'font-size:12.0pt'> > > <hr size=3D2 width=3D"100%" align=3Dcenter> > > </span></font></div> > > <div class=3DMsoNormal align=3Dcenter = > style=3D'margin-left:36.0pt;text-align:center'><font > size=3D3 face=3D"Times New Roman"><span style=3D'font-size:12.0pt'> > > <hr size=3D2 width=3D"100%" align=3Dcenter> > > </span></font></div> > > <p class=3DMsoNormal style=3D'margin-left:36.0pt'><font size=3D3 > face=3D"Times New Roman"><span style=3D'font-size:12.0pt'>This e-mail = > message has > been scanned for Viruses and Content and cleared by <strong><b><font > color=3D"#ff8000" face=3D"Times New Roman"><span = > style=3D'color:#FF8000'>MailMarshal</span></font> > - </b></strong>For more information please visit<strong><b><font > face=3D"Times New Roman"> </font></b></strong><a > href=3D"http://www.marshalsoftware.com"><strong><b><font face=3D"Times = > New = > Roman">www.marshalsoftware.com</font></b></strong></a><strong><b><font > face=3D"Times New Roman"> = > </font></b></strong><o:p></o:p></span></font></p> > > <div class=3DMsoNormal align=3Dcenter = > style=3D'margin-left:36.0pt;text-align:center'><font > size=3D3 face=3D"Times New Roman"><span style=3D'font-size:12.0pt'> > > <hr size=3D2 width=3D"100%" align=3Dcenter> > > </span></font></div> > > </div> > > </body> > > </html> > > ------_=_NextPart_001_01C27F2F.5CF0F180-- -- Please see the official ORACLE-L FAQ: http://www.orafaq.com -- Author: Jared Still INET: [EMAIL PROTECTED] Fat City Network Services -- 858-538-5051 http://www.fatcity.com San Diego, California -- Mailing list and web hosting services --------------------------------------------------------------------- To REMOVE yourself from this mailing list, send an E-Mail message to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in the message BODY, include a line containing: UNSUB ORACLE-L (or the name of mailing list you want to be removed from). You may also send the HELP command for other information (like subscribing). -- Please see the official ORACLE-L FAQ: http://www.orafaq.com -- Author: Cary Millsap INET: [EMAIL PROTECTED] Fat City Network Services -- 858-538-5051 http://www.fatcity.com San Diego, California -- Mailing list and web hosting services --------------------------------------------------------------------- To REMOVE yourself from this mailing list, send an E-Mail message to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in the message BODY, include a line containing: UNSUB ORACLE-L (or the name of mailing list you want to be removed from). You may also send the HELP command for other information (like subscribing).