Artem Harutyunyan wrote:
> However,
> when I run the script under apache (with mod_perl) I see that
> LD_LIBRARY_PATH is ignored (I mean it seems to load the libraries from
> another location). How can I fix the problem ?
What OS are you running? I know at least for linux LD_LIBRARY_PATH is specia
Hi Michael,
Thank you very much for the exhaustive answer.
Artem.
On 8/15/07, Michael Peters <[EMAIL PROTECTED]> wrote:
>
> Artem Harutyunyan wrote:
> > However,
> > when I run the script under apache (with mod_perl) I see that
> > LD_LIBRARY_PATH is ignored (I mean it seems to load the librarie
Hi,
I have 2 questions:
1) There is a script which uses Authen::SASL::Cyrus module. During the work
the module needs to load some external dynamic libraries (.so files). To
have correct libraries loaded I set LD_LIBRARY_PATH, this works when running
my script with usual (command line) perl. Howev
Thanks Fred.
The problem is, I don't have access to httpd.conf, therefore I can't run
scripts like that.
Is there an alternative?
TIA
On 8/13/07, Fred Moyer <[EMAIL PROTECTED]> wrote:
>
> [please cc the mod_perl list when responding]
>
> Mag Gam wrote:
> > Fred:
> >
> > Thanks. Looks like I may
Hi all
Anyone who has the (chm/pdf), please give me a
copy.
Thanks
Good luck.
Luke
Hello all,
I am quite new to Perl, mod_perl and mod_perl2 so please excuse me for
my questions. It my sounds noobish.
In the code below, the class XXX:YYY3 inherits Net::Cmd,
IO::Socket::Inet, create an object $obj with the SUPER keyword.
As far as I know, this code works well under Apache 1.3,
Luke Lu wrote:
> Hi all
>
>Anyone who has the (chm/pdf), please give me a
> copy.
http://www.modperlbook.org/
--Geoff
This code didn't run.
I don't think we can put an "if" clause inside
$type->SUPER::new(...)
The error I got when running this code is:
syntax error at /XXX/YYY3.pm line 74, near "if"\nsyntax error at /XXX/YYY3.pm
line 77, near "} else"\nsyntax error at /XXX/YYY3.pm line 82, near "
Luke Lu さん
Actually I did exactly what you told me yesterday and $obj was still
undefined.
Here is the code ( check if $obj is undefined inside foreach )
package XXX::YYY3;
@ISA = qw(Net::Cmd IO::Socket::INET);
sub new
{
my $self = shift;
my $type = ref($self) || $self;
my $hosts = "localhos
Yes, it was undefined even inside foreach.
You can see it above the debug lines on my code.
Luke Lu さんは��きました:
> Hi,
> the $obj is undefined everytime?
>
> -邮件原件-
> 发件人: Nguyen Vu Hung [mailto:[EMAIL PROTECTED]
> 发送时间: 2007年8月16日 9:34
> 收件人: Luke Lu
> 抄送: modperl@perl.apache.org
> 主题: Re
Nguyen Vu Hung <[EMAIL PROTECTED]> writes:
> Here is the code ( check if $obj is undefined inside foreach )
>
>
> package XXX::YYY3;
>
> @ISA = qw(Net::Cmd IO::Socket::INET);
>
> sub new
> {
> my $self = shift;
> my $type = ref($self) || $self;
>
> my $hosts = "localhost";
> my $obj;
Lu,
I think IO::Socket:SSL has nothing to do here because this class
inherits Net::Cmd and IO::Socket::INET.
The next part of the code is to connect to a POP server and get emails,
therefore it has no relationship wih IO::Socket:SSL.
The point maybe the word SUPER. AFAIK, "SUPER" means "super cl
Joe Schaefer :
Nguyen Vu Hung <[EMAIL PROTECTED]> writes:
Here is the code ( check if $obj is undefined inside foreach )
package XXX::YYY3;
@ISA = qw(Net::Cmd IO::Socket::INET);
sub new
{
my $self = shift;
my $type = ref($self) || $self;
my $hosts = "localhost";
my $
I am not sure if this is the SUPER package we are looking for.
Being said this, please remember that I am quite new to Perl.
http://search.cpan.org/~chromatic/SUPER-1.16/lib/SUPER.pm
Luke Lu さんは��きました:
> Where can I get the SUPER package? I want to debug it
> If you got it,pls give me a copy
>
>
Nguyen Vu Hung <[EMAIL PROTECTED]> writes:
> foreach $h (@{$hosts})
> {
>
> $obj = $type->SUPER::new(PeerAddr => ($host = $h),
Are you sure you want SUPER::new()? I think in your
case it translates to Net::Cmd::new(), when your args
suggest you want IO::Socket::INET::new().
> PeerPort => 110, #
On 8/15/07, Nguyen Vu Hung <[EMAIL PROTECTED]> wrote:
> In the code below, the class XXX:YYY3 inherits Net::Cmd,
> IO::Socket::Inet, create an object $obj with the SUPER keyword.
>
> As far as I know, this code works well under Apache 1.3, Perl 5.6,
> mod_perl 1.3.
>
> But in current environment wh
16 matches
Mail list logo
