How can I calculate time difference in milliseconds?
Hi I need to read in an email (source with header), and extract the sender's name, or his email address if the name is not available. For example, these are possible "From: " lines in email he...
I'm sure it's simple, but I can't think of the best/shortest way of deleting the a newline (line feed) if it exists on the very last line of a file.
So in the instance of:
$ od -c file
...
Hi World!
Actually I have two questions, first one: I have a perl script that does a select from a DB2 database and stuffs the data in a variable like this:
---------------------------...
I have a text file in the format:
(Future) Ch. Giscours Margaux 750ml 12 per case
WA 90-92 points, This saturated ruby/purple-colored effort offers notes of liquid minerals interspersed wi...
I always forget how to solve this problem, though it happens whever I upgrade Perl. Somehow I've broken the CPAN module.
Any help fixing would be much apprecoiated. BTW, locate CPAN.pm at the...
Hi,
in my perl script i m using date command.
$prev_date has some value and then in one of the sub-routine, i use
$current_date = `date`;
how can i find the difference between 2 date...
I've got the following script:
#!/usr/bin/perl
my @a = ();
while ($line = <>) {
while (@a) {
pop @a;
}
chomp $line;
while ($line...
I have some perl scripts on 30 hosts. I want to execute these script from one host. I have tried to find some wmi code, that could do it, but without any luck. Are there anyone that can point ...
I have a perl script that creates a text file. I need to append the current date to the file name. Right now, I have a variable like this:
# csv path/filename
my $csvfile = "/home/mydire...
How do I get the filename without the extension and replace that extension with a new extension?
Hi, Can some one post me or send me the perl script which can be used to monitor the diskspace of unix filesystems. Please note not to use any of the perl modules.
1. Please note that this p...
Well here is my code....
use Cisco::CopyConfig;
$config = Cisco::CopyConfig->new(Host => 'switchhostname', Comm => 'snmpRWstring');
print $config->error();
$config->copy('xxx.xxx.xxx...
I need a perl script to copy everything in a folder that contains files and folders to a new folder.
Orig folder C:/Program Files/Application/Data/Backups/
Dest folder I:\...
I am writing a perl script to check all of the files in a folder and return the name and datestamp of the most recently modified file.
I think I have most of these steps correct with the ex...
I have a dbh->do(qq"INSERT .... |); statement, but it will error if a $string has quotes in it - is there any easy way around this?
I'm aware of dbh-quote but then all the output is encased...
Hello,
I understand which is the command to find /sqlload/raptor/archive -mtime +30 -exec rm -rf {} \;
However what I need is to delete the files that are under the following place:
/s...
hi..
i have this perl code that create csv files as well as text files.
however, my csv fils could only print 1 output instead of 2.
how can i modify the below code to include the
fore...
Hi i cant get this perl program to work for me on the server i am on but as soon as i try it on one of the other servers i have access to it will work the error i have is
_________________...
I need to execute a program that is parallel to my script, but need full path to cwd. I know how to execute it by hardcoding the cwd, but how do I get it at runtime?
i write a perl code as a web service client using SOAP::Lite, it works fine in most cases.
When the server throw out the messege: "There is an error in XML document (1, 431)"
and the inner e...
I have to compare two input dates format MM/DD/YYYY and calculate how many days are between both dates
For example
D1. 12/05/2007
D2. 12/04/2006
Difference is 366 days.
Is there any...
I have a variable HV *myHash - which may be a simple Perl hash, an object or a tied variable. I want to make a copy of it (its variables) into a new variable myHash2, and destroy it afterwar...
please tell me how to add date in perl.
sample : 01/01/2004+14 => 14/01/2004
PERL , AIX machine, I wold like to run HEAD or TAIL commands within a perl script so I can get only the first line and only the last line of each file. I want to output them to a seperate ...
