A have an array of arrays which I want to sort according to the 3rd element of each of the child arrays, how can I do that?
In the code snippet below I would like the output to be:
5,3
3,5
...
How does one retrieve that last time a file was modified in perl? The desired output for this would be MM/DD/YYYY HH:MM:SS.
Hi - I am opening a socket up from a Mandrake machine (Little Endian) to an HP9000 (Big Endian) and receiving a record out of a KISAM file into a variable.
I then write this variable to dis...
What would be best to convert the following names (just those with ALL CAPITAL LETTERS)
LONGNAME to Longname
LONG NAME to Long Name
NAME (no conversion)
Long Name (no conversion)
if((length(...
In Windows how can i use Perl to list all files in a directory older than 4 hours.
Hi there,
I have a two-part question.
1) Ozo recently pointed me to the excellent Date::Manip module. I have that working fine now, but I'd ideally like to set it up to incorporate holi...
Hi,
I am trying to setup and sftp session to and external server. We have all read exchanged keys. The sftp command "SFTP User@ftp.host.com" connects fine.
Below is a piece of t...
Hi,
When you're using the following syntax to iterate a 2D array:
for ($it (@my2dArray)) {
for ($j = 0; $j < @$it; $j++) {
}
}
I'm assuming that:
...
I have set of files which are in the following format:
2004-12-16 00:43:13.861 234717728 161204004555 0 18.5
The last column is a floating number. I try to get the floating number b...
According to a "teach yourself Perl" book I've got here, I can reset STDOUT to the default (ie. normal STDOUT) by doing this :
open(STDOUT,">-");
However, if I do this :
print "Hello1...
Hi, I want to decode this email subject:
Subject: =?iso-8859-1?B?VGVzdGluZyBlbWFpbCBoZWFkZXJz?=
It was generated using MailStudio @Message from 3rsoft.com, but I don't know what kind of ...
Why command below doesn't work? Even I try qx, it also doesn't work....
#!/usr/bin/perl -w
system "setenv P Hello";
print "\nEnvironment Variable P = $ENV{P}\n\n" ;
Pls advice.
hi,
I'm currently trying to run a perl script which will calculate the current date and a previous date and then use these two dates in an sql query.
this is the script i'm using:
#!/...
Perl came with my server (5.8) so it shows it was compiler with AIX's default C compiler cc_r. This compiler I never installed since GCC was free. But now I am forced to install all modules us...
Hi All..
While I run the following CGI script,(this is for URL redirection) the page is not redirecting to the appropriate location.Here is the simple redirection script..
#!/usr/bin/per...
Hi,
im trying to put together a Perl requestor script (check-flight.pl), which i want it to send a SOAP message to
http://homepages.feis.herts.ac.uk/~3com0097/cgi-bin/flights.cgi
does ...
I'm receiving an error when trying to use SFTP.
All I'm doing is setting up a connection to a server:
use Net::SFTP;
#FTP Variables
my $hostname = 'some ftp site';
my %args = (
...
I have an sorted array like (10,9,8,7,7,6,5,4,3,2,1,0,0,0,0,-1,-1)
and I like to create a position indeix array from this which contains the position of the elements but
without the subseque...
I have a log file that I need to get the domain from the 8th field with out the user name, all domains except
for ones containing (my.domain.com) then get a count on each uniq domain name and...
hello,
I'm having difficulties deflating gzip encoded documents retrieved from sites that have gzip encoding.
here's the code:
##www.pl
#!/usr/bin/perl
use IO::Socket;
use IO::...
Hi
I am writing a script to fetch content of a page...this page requires a user name and password .... the login page is like this
<script language="javascript">
function validate(){
...
Hi,
I'm trying to write a perl code to test valid email address. Valid address: someone@some.com Is the following code correct? If not, how to correct it?
$search =~ / (\w+ @...
After using the Net::FTP module to copy files locally, I'd like to set the time and date of creation/modification to the same as that on the server. I don't believe there's an option to do so...
I have a CGI script for uploading .zip files, unzipping the file, and then display success message. I am able to upload the zip file to my server. However, I cannot get Perl to unzip the file....
I try to parse the tomcat error log to generate short error report which only show the unique error messages.
For example, the error messages in tomcat.error.log.1 look like:
===============...
