Hello,
I am trying to determine the actual local userid from a script that is running under the elevated SMS service account ID.
Does anyone know how I can do this?
I'm using Kix as the script but am open to any ideas.
Thank you!
Hello,
We are trying to install the Cisco VPN Client v3.6.4a to XP laptops. These laptop users are set as "Power Users" and so we have to use the elevated security from the SMS client.
The installation seems to work fine but after the final reboot the laptop is unable to locate the...
Hello,
I've found many instances where I am processing large text files as input to a process. I would like to be able to give some sort of indication of progress without scrolling a number off the screen.
My thought is to read in the input text file and determine its size (number of lines...
Hello,
I'm using Perl on Windows to read in a file as such:
APPLS\UTILITY\NOV2WIN mtuser:RXL
I read in the entire file full of these and put them into an array (@array).
if I do a "Print @array\n"; all of the backslashes that were in the text file are intact.
I however cannot seem...
I have a program which can require several arguements. I use the join command then parse out data I recognize.
the scrip snip below is what I use to grab the filename. I'm not sure why it won't accept full pathing such as "D:\utility\filename.txt" which comes out as just...
Is there an easy way to exit / restart the Perl script you're currently running?
Also, is there anything special to calling another external Perl script.
Thank you in advance for any help. Grabbing the Perl books now =)
-G
Help!
I guess I'm stumped on some useage for variables.
I've written a menu in perl. The menu script reads from a text file to determine what to display on the menu and then what to do for that selection.
Sample of menu data file($description, $command):
Copy data, Copy $from $to
Delete...
Help...
I've got a script which I'm passing several arguements to, or maybe none depending on the situation.
I use the join command to smack them into one variable and am working with that.
-snip-
if ($usern =~ m/-[vV]/) { # verbose
$usern =~ s/\s*(\-[vV])\s*//;
$v = 1;}
if ($usern =~...
Hello,
I think I'm getting close to the solution...
What I'd like to do is be able to pass to the perl program either 1, 2 or no arguements and of the two passed maybe allow them to be in either order....
Example:
Perl userquery.pl myname -v
or
Perl userquery.pl -v myname
-v for verbose
if...
Hello!
I'm trying to find a way to get the complete host domain information that a win32 client workstation is logging in to.
For example:
I'm on a windows NT desktop and logging into a Windows2000 domain. I'd like a way to get the full domain name. The environment variable userdomain gives...
Greets!
I would like to write a perl script that spawns x(variable) simultaneous tasks to work through a directory structure…
In this particular case, I want to use Robocopy.
I’ve found that a single Robocopy of a large directory structure is very slow compared to 4 simultaneous Robocopies...
Hello,
I'm working on optimizing a login script (it's running too slow...)
I'm wondering if anyone has any idea's of a better way to handle my drive mapping routine.
Due to the fact that we're converting this to an executeable I'm trying to avoid adding modules. I'm thinking that there is a...
Hello,
I'm looking for advice regarding setting up a null session folder share on a clustered MS server.
There does not seem to be a way to do it with the cluster MMC.
I only have a production server to test on so I have to be carefull, any suggestions are welcome =)
Thanks!
Hello,
I'm wondering if anyone has ANY information on using Perl to work with Micro$oft Cluster, in specific creating clustered resources (shares).
Thank you!
Hello,
I'm looking into how to parse an active log file. It does not seem to be locked open - but is appended to.
I would like to be able to parse the file as new lines are added.
I've read and parsed in-active files, that ends once it reaches the end tho.
Thanks!
Hello,
I'm running some regexp's and I use $1 to get the information within the query but if for example one regexp returns nothing, but the one before it did then $1 still contains the information from the prior success... =(
I tried to do $1 = ""; but that failed with a "read...
Try as I might,
I need to parse the information from a line read in and get everything from the last backslash (\) to the end of the line (\n).
I've tried a few things but have a feeling I'm way off base. Will I need to do a split function? I'm still learning, so be gentle.
My best guess...
Two questions and code below.
What is the best way to escape a While loop if the desired results is met before the while completes?
The script below is looking for a key phrase "Assign Printers" which it does find and then stops as I had hoped, but it finds the second occurance...
I'm sure you'd all get bored if I stopped posting my Perl troubles ;)
Here's a snippet of code I have which is plaguing me.
I am parsing a log file line by line, the first input works, the second does not work as I had hoped.
It seems it should be obvious...
Input:
[Mon May 13 20:05:51...
Greetings,
I'm struggling with a little perl quandry.
I'm reading in a file to parse but some of the values I read in have different words for the same value, so I would like the related words to be converted to the common name.
For example, if I read in "large" or "Huge"...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.