t;ls" from the shell, the install.sh
file has disappeared
Can someone shed light on where I am goofing up? FYI, the directory where
the scripts (installer and perl script) are being run is mounted on a NFS
volume under /usr/local. I am logged in as root on my local machine.
Thanks i
Hi James,
There should be no problem going by your code and assuming you've the
environment variables setup as indicated. What are the contents of
$a->content()? Are you getting a error code such as 501, 404? Also, you
might want to verify the version of WWW::Mechanize that is installed in your
sy
Try perl -MCPAN -e "force install Mail::Sender"
Rajesh
> -Original Message-
> From: Michael Weber [mailto:[EMAIL PROTECTED]
> Sent: Tuesday, March 16, 2004 9:28 AM
> To: [EMAIL PROTECTED]
> Subject: ActiveState Win32 MCPAN install problem
>
>
> Good morning!
>
> I am running ActiveSta
bove example, I need only need filename from dir1 and dir2 that was
last modified. Is there a way to do this filtration in the find( sub {} )
above?
Any help will be deeply appreciated.
Thanks,
Rajesh Dorairajan
[EMAIL PROTECTED]
rahn [mailto:[EMAIL PROTECTED]
> Sent: Friday, March 26, 2004 1:24 AM
> To: [EMAIL PROTECTED]
> Subject: Re: Search for a file pattern in a directory tree recursively
>
>
> Rajesh Dorairajan wrote:
> >
> > Hello All,
>
> Hello,
>
> > I went through al
use IO::Socket;
$ip = inet_ntoa((gethostbyname($HOSTNAME))[4]);
Rajesh
> -Original Message-
> From: Emmanuel Lesouef [mailto:[EMAIL PROTECTED]
> Sent: Thursday, April 22, 2004 1:02 PM
> To: [EMAIL PROTECTED]
> Subject: Finding the current IP of my laptop
>
>
> Hello all,
>
> I am tryi
Sorry. Missed out getting hostname.
use IO::Socket;
use Sys::Hostname;
$HOSTNAME = hostname();
$ip = inet_ntoa((gethostbyname($HOSTNAME))[4]);
Rajesh
> -Original Message-
> From: Rajesh Dorairajan
> Sent: Thursday, April 22, 2004 2:18 PM
> To: 'Emmanuel Lesouef&#
Hello All,
I am looking for a thread-safe Perl logging module to log output from a
Multi-threaded Perl Application. When I tried to write to a log file using
simple redirection, the threads contest for the log file. Creating a log
file for each thread creates a bunch of log files in my machine. Is
Hello All,
I've to extract a CN (Common Name) from an LDAP DN. The LDAP DN is as shown
below:
isuer=CN=Name,OU=People,OU=com
I just need to extract the Name from the above string. Right now I've
my @tmpList = split ( /=CN=/, $_ );
$issuer = $tmpList[1];
But this returns the whole string "Name,
Does anyone know of a way to open a file in append mode and append on top of
the file?
Thanks in Advance,
--Rajesh
Title: RE: Append on top
I looked at the archives and found a mail by NYMI Jose where the code was pretty neat. It was actually for inserting in the middle of the file. However, I could not get it to append on top. I am enclosing the mail containing his code as attachment if someone likes to c
$0
-Original Message-
From: Zielfelder, Robert [mailto:[EMAIL PROTECTED]
Sent: Wednesday, November 03, 2004 12:18 PM
To: Perl Beginners List (E-mail)
Subject: How to get name of script
How do I get the name of the current PERL script I am running? The answer
to this question may be ver
t;not ok 2\n";
---
Please let me know if you have any suggestions on how to go about
implementing such a program.
Thanks in Advance
Rajesh Dorairajan
Original Message-
From: Wiggins d Anconia [mailto:[EMAIL PROTECTED]
Sent: Tuesday, November 04, 2003 6:11 AM
To: Rajesh Dorairajan; '[EMAIL PROTECTED]'
Subject: Re: How to pass a variable to .t file
>
> Can someone help me understand how does one pass variable to a Perl t
re LWP::UserAgent;
my $ua = LWP::UserAgent->new(env_proxy => 0,
keep_alive => 0,
timeout => 30,
);
$response = $ua->get( $url );
Thanks in Advance,
Rajesh Dorairajan
Sorry. Forgot to mention. $Host already contains http://servername
Thanks
Rajesh
-Original Message-
From: Sethi, Pradeep [mailto:[EMAIL PROTECTED]
Sent: Monday, November 10, 2003 1:23 PM
To: Rajesh Dorairajan
Subject: RE: Peculiar problem using LWP::UserAgent
What's the val
e-
From: david [mailto:[EMAIL PROTECTED]
Sent: Monday, November 10, 2003 3:19 PM
To: [EMAIL PROTECTED]
Subject: Re: Peculiar problem using LWP::UserAgent
Rajesh Dorairajan wrote:
> I ran into peculiar problem using LWP::UserAgent. I receive a 501 - Not
> yet implemented error when I conne
I've a similar need. However, I do not want to create a module, since the
function I need to call is already inside a module. All I want to do is:
#Create a logger object and log a message using log4perl
#call the function and check the $retval
#if $retval == 1 $logger->info("Test succeded")
#else
am going through the test scripts
of LWP too.
Best Regds
Rajesh Dorairajan
-Original Message-
From: drieux [mailto:[EMAIL PROTECTED]
Sent: Friday, November 14, 2003 3:54 PM
To: begin begin
Subject: An Alternative to Test::Harness was Re: external sub routine
On Friday, Nov 14, 2003, at 13
'IO::File=GLOB(0x3cc4b1c)'"
I am not sure if Archive::Zip module recognizes the archive created by
Installshield. Does anybody have a suggestion on how this can be done?
Perhaps there is another Module that extract the contents? My search on CPAN
did not yield any results. Any help will
Rajesh
-Original Message-
From: Andrew Gaffney [mailto:[EMAIL PROTECTED]
Sent: Friday, November 21, 2003 7:09 AM
To: '[EMAIL PROTECTED]'
Subject: Re: Need to extract an Installshield archive
Rajesh Dorairajan wrote:
> Hello,
>
> I've an archive (.exe) generated by I
Sendmail is a nice Perl module that lets you do this.
http://www.tneoh.zoneit.com/perl/SendMail/
Rajesh
-Original Message-
From: Paul Kraus [mailto:[EMAIL PROTECTED]
Sent: Friday, November 21, 2003 8:36 AM
To: 'liuxu'; [EMAIL PROTECTED]
Subject: RE: how to send mail using Perl
Check ou
ver:
foreach my $foo ( $self->c ) {
print $foo;
}
gets me the whole list (1, 2, 3, 4) in $foo instead of one-by-one. What I am
doing wrong? I am sure I am missing something very basic here. I would
appreaciate your responses.
Thanks
Rajesh Dorairajan
Valicert/Tumbleweed Communications.
[EMAIL PROTECTED]
650-216-2018
http://www.tumbleweed.com
message bounced. retrying
-Original Message-
From: Rajesh Dorairajan
Sent: Friday, November 21, 2003 1:19 PM
To: '[EMAIL PROTECTED]'
Subject: dereferencing a list from a class
I've a class (blessed, of course :)) that has variables like:
$self->a = "1";
$se
--Original Message-
From: James Edward Gray II [mailto:[EMAIL PROTECTED]
Sent: Saturday, November 22, 2003 8:18 AM
To: Rajesh Dorairajan
Cc: '[EMAIL PROTECTED]'
Subject: Re: dereferencing a list from a class
On Nov 21, 2003, at 3:19 PM, Rajesh Dorairajan wrote:
> I've
perldoc perlboot
-Original Message-
From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]
Sent: Tuesday, November 25, 2003 10:31 AM
To: [EMAIL PROTECTED]
Subject: simple module
Hi all,
i am new to OO programming in Perl. Can someone suggest a simple Object
Oriented Perl module thru which i
TION=".$urls[2]->url."\n\n"; #This is where I need the
fully qualified URL instead of the relative URL that I get currently
$count++;
}
I looked up a lot on the web before sending this mail. I am not able to find
any documentation that points to this. Any help will be deeply appreciated.
Rajesh Dorairajan
ob Dixon [mailto:[EMAIL PROTECTED]
> Sent: Thursday, December 25, 2003 4:59 AM
> To: [EMAIL PROTECTED]
> Subject: Re: How to extract the full URL from a relative link
> using WWW:
> : Mecha nize
>
>
> Rajesh Dorairajan wrote:
> >
> > I am using WWW::Mechanize
; 0,
keep_alive => 0,
timeout=> 30);
my $r = $ua->request(HTTP::Request->new(GET => $url));
print $r->content if($r->is_success);
print $r->code,': ',$r->status_line unless($r->is_success);
print "\n";
}
Rajesh Dorairajan
Sorry the syntax error was by mistake. It's not in the actual code.
Rajesh
> -Original Message-
> From: david [mailto:[EMAIL PROTECTED]
> Sent: Wednesday, February 18, 2004 4:01 PM
> To: [EMAIL PROTECTED]
> Subject: Re: Problem with LWP::UserAgent
>
>
Hello David,
First of all, thank you very much for taking the effort to help me solve the
problem. Sorry for the delay in my reply.
> please do not top post. when you reply to any message, post
> your respond
> below the relevant text.
>
Sorry about this. Will make sure I do this future.
> l
Open PERL IDE is a very good PERL dvelopment environment. But it only runs
on Windows. For linux vim or EMACS might be good.
http://open-perl-ide.sourceforge.net/
RD
-Original Message-
From: Trevor Morrison [mailto:[EMAIL PROTECTED]
Sent: Thursday, July 24, 2003 7:54 PM
To: [EMAIL PROTEC
I don't know if someone already replied to this. I ran into this issue on
Windows. I overcame it by editing the Makefile.PL and removing the entry
PREREQ_PM from the hash and doing
perl Makefile.PL
(n)make
(n)make install
Try it out
Rajesh
-Original Message-
From: Sylvain Masnada [mailt
Hello All,
I have a very basic question. I need to launch a Bourne shell script using
PERL and automate the responses required by the script. I have shown the
sample shell script below:
#!/bin/sh
echo "Welcome to my script"
echo "Do you want to continue"
read ans
if [ $ans = "n" ] then
exit
Does anyone know where I can find a good implementation of OpenSSL library
on Perl. I tried Massimmilio Pala's OpenCA::OpenSSL and ran into some issues
there. Specifically, I am not able to generate a request. Whatever DN string
I pass does not seem to be acceptable to the underlying OpenSSL librar
hoice.
Thank you very much for your suggestion though.
Rajesh
-Original Message-
From: Wiggins d'Anconia [mailto:[EMAIL PROTECTED]
Sent: Saturday, September 20, 2003 10:05 AM
To: Rajesh Dorairajan
Cc: '[EMAIL PROTECTED]'
Subject: Re: Looking for a good OpenSSL/Perl library
Can someone explain how does one pass a parameter to a Perl Module? To
illustrate suppose I've My::Module
package My::Module;
BEGIN
{
$scalar = $input;
}
use Exporter;
our @ISA = qw(Exporter);
our @EXPORT = ($scalar);
In the above script is there anyway to pass the $input variable to the
pack
37 matches
Mail list logo
