When Querying an mySQL database, what is more optimal? to sort using SQL Sort and getting back the results that way, or sorting using regular perl sort, by putting it in a hash. I am just wond...
How to write a script to :
1)Ping Local Machine
2)Ping Remote Machine
In this question: http://www.experts-exchange.com/Programming/Programming_Languages/Perl/Q_21846607.html I asked for a script that helped me match mac address on a cisco catalyst switch to it'...
I have the following perl wmi script:
use Win32::OLE qw(in);
$Win32::OLE::Warn = 3;
print "\n\n\n";
# ------ SCRIPT CONFIGURATION ------
$all_host="host.txt";
open(HOST_TABLE,"<$all_ho...
I'm trying to install the SFTP module. I used this command:
perl -MCPAN -e 'install Net::SFTP'
It looked like it was installing fine and it got down to a section where it was, from what I...
Hi All
I need help reading a multi line variable. I cant install any modules on the server due to security reasons, this need s to work without any modules. ALL of the tag format is the wa...
HI I have a script that do the file encryption stuff. I want to add a file checksum so that if anybody change in the encrypted file and try to decrypt it, it should give message that "checksum...
I have an array called @gmx
I need to pull the last element from it and pass it to a variable.
I have hacked away and not having any luck.
How do I do this?
OK ... This is a very frustrating problem that I would really appreciate some help with.
Quick background: I am using VBA in Excel to load up websites containing information on stock optio...
Hi All,
This should be easy for you PERL folks.
I have some of the fields in my guestbook script that are mandatory and I'm seeing where whitespace is entered in those fields and it mak...
Dear Expert,
When I read a data file as format as follow at runtime
AA 1
AB 1
AC 1
AA 1
AD 1
AD 1
I need to create an associative array (AA->2, AB-...
I'm writing a small UDP port scanner that just relys on an ICMP response to detect non-filtered/closed ports.
For some reason my code is returning an ICMP type 69 Code 1 which is not a val...
I am trying to convert the folowing python code to perl..
------------------------------------------------------
from Crypto.Cipher import DES3
CALC_3DES = 0x6603
iv = 'testtest'
key = ...
I have this command that give me what I need but can't get the print out right.
perl -ne 'if (/(\[.*\])/ & /calid=(.*?).dtstart=(.*?)&.*dtend=(.*?)&(summary=.*)&desc=/ && !/uid=/) {print "$...
Hi;
I have a program that I am converting to Perl from BAT. I am having issues calling system commands and take the output and use it for another command. For example
UserLocLA = File.new(...
Okay... It looks like the person who collects the files is always a day behind in the date. The collect them at 3 PM for some reason. Anyway... I need the following perl file to reflect the...
Hi all,
I have the following error:
Can't locate LiteInterface.pm in @INC (@INC contains: /usr/intel/97r1.3/lib/perl5/i386_linux22/5.00404 /usr/intel/97r1.3/lib/perl5 /usr/intel/97r1.3/...
I keep getting this error....is there something missing?
Can't locate File/Tail.pm in @INC (@INC contains: C:\Program Files\ActiveState P
erl Dev Kit 6.0\lib\ C:/Perl/lib C:/Perl/site/lib...
how do i install perl with module XML::Simple on linux ,windows and solaris or from where i can downlaod perl with which version which will have module XML::SIMPLE ,
Thnks
As many of us programmers are aware, the US DST change is creating a mini Y2K style audit of existing software, to make sure it is "DST compatible". A few of the applications I need to check ...
Hello,
I am trying to capture the STDERR & STDOUT into files while executing system and/or pipe commands. The problem I am having is either STDOUT shuts down, and doesn't return... or if I...
I have some Perl code where I am trying to return a value from a subroutine, but I'm getting all kinds of errors. Here is the code I have:
while($sth->fetch())
{
# if($leventid == 2||3||4...
I have a very large file, > 11G, to sort. While my computer only have 1G memory. So, I want to first split this file into 100 chunks. Then I qsort each chunk, store the results into 100 new fi...
I dont understand why there is one more $SIG(CHLD) function inside the while loop . is it necessary?
use POSIX ":sys_wait_h";
sub zombie_reaper {
while ( waitpid( -1, WNOHANG ) > 0 )
{ ...
I need to be able to read the play times of as many video formats as possible with PERL.
Mainly AVI, WMV, MPG/MPEG, DIVX, MOV, ASF
Any ideas?
Thanks!
Dr34m3r
