RE: splitting the string.

$a ='abcdef'; @arr = split(//,$a); print "@arr"; > -- > From: Raja Gopal[SMTP:[EMAIL PROTECTED]] > Sent: Thursday, March 21, 2002 12:11 PM > To: [EMAIL PROTECTED] > Subject: splitting the string. > > Hello Perl Experts, > > I want to split the string $a ="abcde

RE: net::telnet

CTED] > Subject: Re: net::telnet > > On Sat, Feb 23, 2002 at 02:13:27PM +0530, Veeraraju_Mareddi wrote: > > Please see the code here. But This program terminates if one of > > them is Failed. > > It terminates because Net::Telnet->Errmode defaults to 'die'

net::telnet

Dear All, Please see the code here. --- use Net::Telnet; $telnet = new Net::Telnet(Port => 25); $result ='Active'; @hosts=('208.220.254.1',208.220.254.2',208.220.254.3'); foreach $host(@hostes){ $t

RE: Win32::RasAdmin

; From: Roselander, Noah[SMTP:[EMAIL PROTECTED]] > Sent: Saturday, February 16, 2002 1:51 AM > To: 'Veeraraju_Mareddi' > Subject: RE: Win32::RasAdmin > > <> > Hi, > I can't post to the list because of some confusion about my email add

Win32::RasAdmin

Dear Team, I am trying to install Win32::RasAdmin.but I am getting some errors.Is there any way of Source where there are not errors. While installing Form Activestate.com ,Roth.net,PPD format is not working. Could anybody of you can tell where is the Correct Source to Install. The Matter is u

RAS checking

Dear All, Is there any way to detect whether the RAS server is working properly or not .Can we write any script to dial and test the Conectivity at some time intervals Please suggest me if anyone of you worked/working on this concept Please suggest some modules about this with Regards Raju ***

Grant a right to User in NT

Dear All, Is there any way to grant a NT right to User using the Script.Any module for this purpose Thanks and Regards Raju M.V ** This email (including any attachments) is intended for the sole use of the intended recipien

killing object/process in 5 sec ,if not completed

Dear Team, Is there any way to kill a process/Object in a specified time ,if it is not completed for Windows NT?. Even doing some other action is also helpful, when it is not finished in a finite time. Please tell me your valuable suggestions . Thank you each & every one of you.. With Best Re

Password Expire

Dear Team, How do we detect password expire for an account using Win32::Lanman or Win32::AdminMisc. With Win32::Lanman::Netgetuserattributes(),We get all User Attributes, But How to detect password Expire. I think password Expire is different from Password Age. IS it right?? Please help if any

RE: Checking to see if $user exists in a hash.

You Can use defined() perl function -- From: John W. Krahn [SMTP:[EMAIL PROTECTED]] Sent: Tuesday, November 27, 2001 3:37 PM To: [EMAIL PROTECTED] Subject: Re: Checking to see if $user exists in a hash. Daniel Falkenberg wrote:

Backticks Command Execution

$pat = `echo \%path\%` This should direct output of the echo command to $path variable. But this is not happening,but it displays output to the screen instead. I ran this script in around 200 systems(windows 95 + windows 98),130 out of them produced the required output ,as remining failed. Wha

Win32::Perms

Dear All Can you find out any mistake here, I am not able to change permissions on Registry keys.Please help if any body knows this. Code is given here. ### use Win32::Perms; unless($obj = Win32::Perms::New("registry:HKEY_LOCAL_MACHI

registry Security permissions.

Dear All, Is there any way to controll registry security permissions as we can do it from REGEDT32.exe in NT. This is very Urgent. Please respond if any. Thank you very much. With Regards Raju -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: [PBML] Re: Regex needed

Try this open(FILE ,"c:/file.txt"); while(){ while(/Description[\.\s]*:(.+)/ig){ print "$1\n"; } } ### Raju > -- > From: Jorge Goncalvez[SMTP:[EMAIL PROTECTED]] > Reply To: Jorge Goncalvez > Sent: Thursday,

IPC Question

open(WRITE, "|notepad"); print WRITE "Raju"; This should open a notepad and write Raju to the notepad. But its not doing So WHY??. With Regards Raju -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

RE: Can we Access MDB database file in PERL ,Any Modules On that? ?

Any Docs with Examples..Please... Thanks With Warm Regards Raju -- From: Curtis, Graeme A [SMTP:[EMAIL PROTECTED]] Sent: Monday, October 29, 2001 5:43 PM To: 'Veeraraju_Mareddi' Subject: RE: Can we

RE: Regular expression help!!

Hi Warren Just Look at it. $str= 'insert_job: DUKS_rtcf_daily_log_purge job_type: c'; $str =~ s/[^:]*://; With Regards Raju -- From: Woz [SMTP:[EMAIL PROTECTED]] Sent: Thursday, October 25, 2001 3:34 PM To: [EMAIL PROTECTED]; [EMAIL PROTECTED

RE: Subtracting two arrays

t Regards Raju > -- > From: Chuck Lawhorn[SMTP:[EMAIL PROTECTED]] > Sent: Sunday, September 23, 2001 9:56 AM > To: Veeraraju_Mareddi > Subject: RE: Subtracting two arrays > > Raju-- > > When you step through the two arrays, you incre

RE: reg expr

Dear Walter Put all this records in a file c:\test.log.and use this code. It will show Ip Address as well as PORT Number. -- open(READ,"c:\\test.log"); while(){ if(/(\d{1,3}\.\d{1,3}\.\d{1,3

Win32::NetAdmin

Dear All How do i know all flags(SV_TYPE_*) available with Win32::NetAdmin. Is there any docs available on this.. Thanx and Regards Raju ___ Perl-Win32-Admin mailing list [EMAIL PROTECTED] http://listserv.ActiveState.com/mailman/listinfo/perl-win32-a

REGEX Premath $`

Why this is not working?Its ending with One test only, Its not working entire the string open(READ,"c:\\SMTP.txt");open(WRITE,">>c:\\SMTP1.txt"); while() { /,/gi; print WRITE "'$`',";} ===

RE: Regular expression needed

You can do this like the following. _ $test=' dhcpd : LOG_INFO : DHCPDISCOVER from 02:41:53:20:d0:34:5b:a6:ef:3c:c1:01:01:00:00:00 via eth0'; if($test =~ /DHCPDISCOVER

IO::Socket

Dear List, Please update me any links towards creating SCOKETs, Communicatin on sockets and Communication between processes using Socket communication my script need to contact a process which is on remote machine. Please give me some URLs or IDEAS regarding this. Any documentation with Examp

Remote process

Dear List How do we execute some script on REMOTE machine. That means I wanna create a process on a remote machine which is my perl script. Is there any module written for this purpose. Can we do it with Win32::AdminMIsc your help and suggestion would be highly appriciated With Regards

RE: Can't run Perl script out of x windows

If you want this to be done ,you need to modify path in non xwindows system ,otherwise select the option " Add PERL to SYSTEm PATH" in reinstallation of perl , If you don't want to modify PATH manually Raju -Original Message- From: Jim Ryan [SMTP:[EMAIL PROTECTED]]

RE: Win32::Service

- From: Gary MacDonald [SMTP:[EMAIL PROTECTED]] Sent: Sunday, September 09, 2001 10:52 AM To: 'Veeraraju_Mareddi'; [EMAIL PROTECTED] Cc: [EMAIL PROTECTED] Subject:RE: Win32::Service The server name should be preceded with \\. How

Win32::Service

Dear Team I am trying to check a service on a remote machine using Win32::Service. But it is telling "No such file or directorySuccess". The script is given below Please look in to it.. Service.pl use Win32::Service; if (Win32::Service::GetStatus("hotnt006", "Server", \%status) ==0) { print

Win32::Lanman problem

Dear Team Could you please tell me why this script is reporting error 1060 (this means the specified service is installed) even though this service is there and running fine on the server. Please look into it. use Win32::Lanman; if(!Win32::Lanman::QueryServiceStatus("hotnt006", "", 'server'

Regex s///

Dear All I have a large data file which has ; as delimiter and i want this to be replaced newline character ,but unfortunately my script is not working my code is given below open(NOTE ,">>c:\\data.txt"); #data file while () { s/;/"\n"/; }

Could not start a PERL service

Dear Team I am getting the following error in starting a perl service which is created by my script. Error: error 2186 :The service is not responding to the control function Event Deatails: Event ID:7009, Source: Service Control Manager Timeout (12 milliseconds) waiting for service to con

Password decryption of User accounts From PDC registry

Dear All, I want to decrypt some user account's passwords in NT4 registry on PDC. Is there any module that helps in this regards. I cant do it with Wi32::TieRegistry. Please suggest me some possible ways.. Thanks in Advance With regards Raju -- To unsubscribe, e-mail: [EMAIL PROTECTED] For ad

Password decryption of User accounts From PDC registry

Dear All, I want to decrypt some user account's passwords in NT4 registry on PDC. Is there any module that helps in this regards. I cant do it with Wi32::TieRegistry. Please suggest me some possible ways.. Thanks in Advance With regards Raju -- To unsubscribe, e-mail: [EMAIL PROTECTED] For ad

RE: Getting a list of USERS from an NT USER GROUP

- But I am Getting Only Username ,Is there any way we can get Full Name Also.. Thanx and Regards Rajuveera -- From: Jos I. Boumans [SMTP:[EMAIL PROTECTED]] Sent: Tuesday, September 04, 2001 1:07 PM To: Veeraraju_Mar

Getting a list of USERS from an NT USER GROUP

Dear Beginners, I have a small task of getting NT user list from a NT USER GROUP. Please suggest me.. Thanking you With Regards Rajuveera -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Socket Programming

Dear Friends, I have a small task of Doing/Running some commands on A remote Machine Using Sockets Communication. Till Now I was not familiar with sockets. Could anybody of You Please tell me How to get basic knowledge of SOCKET PROGRAMING with perl. Please Suggest me relative sites for SOCKET

File Handle.

Dear Friends, I have a small task . Actually I have the following line in SCRIPT system ("$netsvc $host /query \"$service\"") == 0 and warn "+error $!" ; But I want this OUTPUT to be sent in a mail, either by sending it in a Attachment or As a text in Mail. Please suggest me how to redirect

Administrators Mailing Groups ???

Dear All, I am new to PERL .Perl is very Interesting and Useful it seems. Please tell me is there any Mailing List for Admin activities Using Perl(Windows NT & UNIX environments). I am interested in writing some scripts using PERL on Administrative purpose.. Please Help me in this regards, Pleas

RE: creating ,interacting with a process on a remote machin

Sent: Saturday, June 23, 2001 3:05 PM To: VeeraRaju_Mareddi; [EMAIL PROTECTED] Subject: Re: creating ,interacting with a process on a remote machin I'm not quite sure what you want to do from the below description, but what you probably want to do is have 2 IO::SOCK

Filehandles

Dear All I want STDOUT to be sent to a FILESHANDLE. I have a script writing output DISPLAY..But I wanna this to be going into a file through FILEHANDLES .. Ur Help is Highly APPRECIATED Thanx and Regards Rajuveera

creating ,interacting with a process on a remote machin

Dear All Is there any Module/Function that creates, interact with the sockets on remote machine?. I am not able to find this function in IO::Socket::INET. Actually my program should create a socket on a remote machine ,Creating a process and Interacting with that socket... Please suggest me som

RE: Remote control

22, 2001 3:56 PM To: VeeraRaju_Mareddi Cc: [EMAIL PROTECTED] Subject: RE: Remote control You should try VNC. It is not exactly a remote control tool, but it may be used to this purpose. It is free (GPL) software, cross-platform and it has good

Remote control

Dear Perl Gurus/Admins, I have a small project in which I need to take system control on a remote machine(Both Windows NT,9x Machines), Like accessing all machines using SMS server & Clients. Please tell me how is it possible?? And also suggest me whether I can do the same thing through SOCKETS

RE: Waking up NT

Hi Clinton If u want ur program to run at a predefined interval of time ,Please put this script in AT jobs. I think It will Do it. Regards Raju -- From: Clinton [SMTP:[EMAIL PROTECTED]] Sent: Sunday, June 10, 2001 4:24 AM To: [EMAIL PROTECTED]

25th Port connectivity

Hi Everybody I wanna scan some specific ports on a remote machine(25th Port), Whether they are active in state or not. Please provide me basic idea for this to be worked out. If anybody of u have idea ,concept please let me. I want to this to be Done through perl script. Ur help would be gratef

Scanning Port Responce

Hi Everybody I wanna scan some specific ports on a remote machine, Whether they are active in state or not. Please provide me basic idea for this to be worked out. If anybody of u have idea ,concept please let me. I wanto this to be Done through perl script. Ur help would be greatful Regards Raj

RE: installing perl

Down Load *.msi(ActivePerl-5.6.0.623-MSWin32-x86-multi-thread.msi) file which available in Activestate.com. And run that with Windows Installer.This is easiest and faster... Regards Raju -- From: Gil Tucker [ateliermobile] [SMTP:[EMAIL PROTECTED]] Sent: Wedne

Problem with NET::PING

Dear All I have a small with NET::PING.I hope its working by following command. USE NET::PING; But I am Not able to check remote connectivity of a host ("HOTNT002") through this NET function...I am sure its reachable by system ping command(Windows NT 4.0).. My Perl Code is given Below: use net:

test mail

test

Hi A Small Problem in PERL

Dear All I am getting a small problem in PERL programming.I am Getting error code 123 if i try to install a serive on a remote system using perl using Win32::AdminMisc. & I am not able to logon to the remote system as a user My purpose is to create a process on a remote system by logging as