Carview!

CARVIEW

MOTORHOMES

Select Language

HTTP/2 302 server: nginx date: Wed, 06 Aug 2025 13:14:47 GMT content-type: text/plain; charset=utf-8 content-length: 0 x-archive-redirect-reason: found capture at 20080422085641 location: https://web.archive.org/web/20080422085641/https://techtasks.com/code/viewbookcode/995 server-timing: captures_list;dur=0.984414, exclusion.robots;dur=0.033505, exclusion.robots.policy;dur=0.014238, esindex;dur=0.014335, cdx.remote;dur=98.403608, LoadShardBlock;dur=542.917915, PetaboxLoader3.resolve;dur=269.798581, PetaboxLoader3.datanode;dur=178.518895 x-app-server: wwwb-app216 x-ts: 302 x-tr: 691 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 set-cookie: wb-p-SERVER=wwwb-app216; path=/ x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() HTTP/2 200 server: nginx date: Wed, 06 Aug 2025 13:14:48 GMT content-type: text/html; charset=utf-8 x-archive-orig-date: Tue, 22 Apr 2008 08:56:39 GMT x-archive-orig-server: Apache/2.0.61 (Unix) PHP/4.4.7 mod_ssl/2.0.61 OpenSSL/0.9.7e mod_fastcgi/2.4.2 DAV/2 SVN/1.4.2 x-archive-orig-set-cookie: _session_id=07f5bb627e054cb5ec6a6022ee2b04cf; path=/ x-archive-orig-cache-control: no-cache x-archive-orig-content-length: 9940 x-archive-orig-connection: close x-archive-guessed-content-type: text/html x-archive-guessed-charset: utf-8 memento-datetime: Tue, 22 Apr 2008 08:56:41 GMT link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Mon, 15 Oct 2007 21:19:08 GMT", ; rel="prev memento"; datetime="Sun, 10 Feb 2008 01:24:27 GMT", ; rel="memento"; datetime="Tue, 22 Apr 2008 08:56:41 GMT", ; rel="next memento"; datetime="Wed, 20 Aug 2008 00:07:33 GMT", ; rel="last memento"; datetime="Sun, 09 Nov 2008 04:36:42 GMT" content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org x-archive-src: 52_3_20080422074829_crawl107-c/52_3_20080422085526_crawl102.arc.gz server-timing: captures_list;dur=0.623262, exclusion.robots;dur=0.024749, exclusion.robots.policy;dur=0.011252, esindex;dur=0.011478, cdx.remote;dur=46.095487, LoadShardBlock;dur=230.152346, PetaboxLoader3.datanode;dur=260.019932, PetaboxLoader3.resolve;dur=565.514747, load_resource;dur=610.021388 x-app-server: wwwb-app216 x-ts: 200 x-tr: 947 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() content-encoding: gzip Authenticating via WMI (Perl) - Active Directory, 3rd Edition

Authenticating via WMI (Perl)

This code can be found in Chapter 29 of Active Directory, 3rd Edition

Purchase XP Cookbook or Networking Recipes for only $25 plus shipping! While supplies last.

Find out how to download all of the Perl code from this site.

# From the book "Active Directory, Third Edition" 
# ISBN: 0-596-10173-2
use Win32::OLE;
$strComputer = 'dc1.mycorp.com';
$strUserName = 'administrator';
$strPassword = 'password';
$objLocator = Win32::OLE->new('WbemScripting.SWbemLocator');
$objWMI = $objLocator->ConnectServer($strComputer, 'root\\cimv2', $strUserName, $strPassword);

This code has been viewed 1332 times.

New from the creators of TechTasks.com: StatSheet.com

Original Source | Taken Source