Help for this page
my $p = Net::Ping->new("icmp"); if ($p->ping($computer)) { ... } $p->close(); }
if ($key = $Registry->Connect("$computer","LMachine/Software/Network A +ssociates/" . "TVD/NetShield NT/CurrentVersion/" {Access=>KEY_READ} ) ) { ... $engine = "Unknown"; } }
use Win32::TieRegistry( Delimiter=>"/" );
# # GetCurrentVersion will the Mcafee download page and grab the version + number ... } return($dat, $superdat, $engine); }
www.com | www.net | www.org
No recent polls found