D]>; <[EMAIL PROTECTED]>
Sent: Friday, March 16, 2001 2:56 AM
Subject: RE: Finding logged in users
> A much simpler solution to this is to create a logon script with code that
> looks kinda like:
>
> $Domain = Win32::DomainName();
> $User = Win32::LoginName();
> $Ma
A much simpler solution to this is to create a logon script with code that
looks kinda like:
$Domain = Win32::DomainName();
$User = Win32::LoginName();
$Machine = Win32::NodeName();
$LogFile = "soomeserver\\someshare\\logon.log";
if( open( LOG, ">$LogFile" ) )
{
# Exclusively lock the
Bruno Bellenger
-Original Message-
From: Chuck Lawhorn [SMTP:[EMAIL PROTECTED]]
Sent: mercredi 14 mars 2001 17:16
To: Bellenger, Bruno (Paris);
'[EMAIL PROTECTED]'
Cc: '[EMAIL PROTECTED]'
Subject:RE: Finding Logge
If you don't want to use the substr command, you could simply remove
all leading backslashes as follows:
$computer =~ s|^\\*||;
Just my $.02,
--Chuck
--- "Bellenger, Bruno (Paris)" <[EMAIL PROTECTED]> wrote:
>
> And this will list all files open through the network on a server.
> Syntax is :
And this will list all files open through the network on a server.
Syntax is :
Perl scriptname.pl computername
or
Perl scriptname.pl \\computername
# NetFileEnum($server, $basepath, $user, \@info)
# Supplies information about some or all open files on server \\$computer.
# Specify tar
This will list users having a network session to a server.
Syntax is
Perl scriptname.pl computername
or
Perl scriptname.pl \\computername
# NetSessionEnum($server, $client, $user, \@info)
# Provides information about all current sessions on server \\$computer.
# Specify target comput
Please note, you need to be more explicit when saying "logged in users".
This script actually will tell you who's INTERACTIVELY logged in, not who
has a network session to the machine.
In any case, the original code worked.
Leave the line
$computer = "$ARGV[0]" ;
then provide the c
You are setting $computer to "//rwaldock". You rpobably want two
backslashes in front of the name instead of two forward slashes.
Your code is set to strip out leading backslashes, but you don't have
any in your computer name.
HTH,
--Chuck
--- [EMAIL PROTECTED] wrote:
> Hi,
>
> I have today