Re: perl script help needed (521 Views)
Reply
Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 1 of 11 (618 Views)

perl script help needed

Hi ,

 

i have  a perl script which we use for ftp , m not able to update the ftplog contents.

Acclaimed Contributor
James R. Ferguson
Posts: 21,184
Registered: ‎07-06-2000
Message 2 of 11 (608 Views)

Re: perl script help needed


zxcv wrote:

Hi ,

 

i have  a perl script which we use for ftp , m not able to update the ftplog contents.



And that tells us nothing.  I assume that you are running the standard HP-UX 'ftpd' daemon. What release of HP-UX?  Do you mean that the 'xferlog' isn't being updated?  If not, do you have 'ftpd' configured with '-i in '/etc/inetd.conf'?  Do you have an 'ftpaccess' file that overrides that?

 

Does this logging failure only occur with your Perl script or does a command line FTP fail to log too?

 

...JRF...

Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 3 of 11 (597 Views)

Re: perl script help needed

Hi James ,



m gettng problem via script..

wen m startng the script like ;

nohup /usr/bin/perl -w /tmp/test.pl -p -d 2 &



BEGIN failed--compilation aborted at /tmp/test.pl line 60.
Use of uninitialized value in subroutine entry at /usr/opt/perl5/lib/5.8.8/aix-thread-multi/XSLoader.pm line 94.
Bad arg length for Socket::inet_ntoa, length is 0, should be 4 at /usr/opt/perl5/lib/5.8.8/aix-thread-multi/XSLoader.pm line 94.
Compilation failed in require at /tmp/test.pl line 60.
BEGIN failed--compilation aborted at /tmp/test.pl line 60....
Acclaimed Contributor
Dennis Handly
Posts: 25,188
Registered: ‎03-06-2006
Message 4 of 11 (587 Views)

Re: perl script help needed

>compilation aborted at /tmp/test.pl line 60.

 

It would help if you could show what was on line 60 and print the values of any variables being used there.

Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 5 of 11 (586 Views)

Re: perl script help needed

60 use Data::Dumper ; # Used only for debugging statements

vim /usr/opt/perl5/lib/5.8.8/aix-thread-multi/XSLoader.pm
92 # See comment block above
93 push(@DynaLoader::dl_shared_objects, $file); # record files loaded
94 return &$xs(@_);
M not able to attache my perl script here ?? why is it so ..
Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 6 of 11 (577 Views)

Re: perl script help needed

Hi

i have found smethng from net ..that usuually its not able to get the hostname....

/usr/opt/perl5/lib/5.8.8/aix-thread-multi/Socket.pm  .........

my hostname is testserver...is it greater than 8 char so itss d probm ????? or smthgnelse..

Acclaimed Contributor
James R. Ferguson
Posts: 21,184
Registered: ‎07-06-2000
Message 7 of 11 (564 Views)

Re: perl script help needed


zxcv wrote:

Hi

i have found smethng from net ..that usuually its not able to get the hostname....

/usr/opt/perl5/lib/5.8.8/aix-thread-multi/Socket.pm  .........

my hostname is testserver...is it greater than 8 char so itss d probm ????? or smthgnelse..


Hi:

 

So, you're running on AIX not HP-UX.  Yes, I suspect that hostnames longer than the classic 8-character limit are a problem.  Why not test on a host whose name is =< 8 ?

 

Actually *posting* the entire script would be more informative then piece-meal, vague descriptions of behavior and observations :-)

 

Regards!

 

...JRF...

Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 8 of 11 (553 Views)

Re: perl script help needed

Hi ,
M not able to attach my perl script here ?? why is it so
Acclaimed Contributor
Dennis Handly
Posts: 25,188
Registered: ‎03-06-2006
Message 9 of 11 (545 Views)

Re: perl script help needed

[ Edited ]

>M not able to attach my perl script here? why is it so 

 

(It would be helpful if you didn't use texting shortcuts, used spell check and fairly complete sentences.  And proper capitalization would be a plus.  :-)

You can go back and edit your posts.

 

Perhaps you don't have the right suffix, try .txt.

Super Advisor
zxcv
Posts: 226
Registered: ‎04-09-2010
Message 10 of 11 (532 Views)

Re: perl script help needed

Hi , let me chk ..

Acclaimed Contributor
James R. Ferguson
Posts: 21,184
Registered: ‎07-06-2000
Message 11 of 11 (521 Views)

Re: perl script help needed

Hi (again):

 

Let me underscore what I said, before:


James R. Ferguson wrote:

zxcv wrote:

i have found smethng from net ..that usuually its not able to get the hostname....

/usr/opt/perl5/lib/5.8.8/aix-thread-multi/Socket.pm  .........

my hostname is testserver...is it greater than 8 char so itss d probm ????? or smthgnels


So, you're running on AIX not HP-UX.  Yes, I suspect that hostnames longer than the classic 8-character limit are a problem.  Why not test on a host whose name is =< 8 ?

 


You're clearly running the script on AIX, not HP-UX.  That said, I strongly suspect, given the relative age of the Perl version (5.8.8) that the C-library support for hostnames longer than the classic 8-character limit is supported.   You previously showed us:

 

BEGIN failed--compilation aborted at /tmp/test.pl line 60.
Use of uninitialized value in subroutine entry at /usr/opt/perl5/lib/5.8.8/aix-thread-multi/XSLoader.pm line 94.
Bad arg length for Socket::inet_ntoa, length is 0, should be 4 at /usr/opt/perl5/lib/5.8.8/aix-thread-multi/XSLoader.pm line 94.
Compilation failed in require at /tmp/test.pl line 60.
BEGIN failed--compilation aborted at /tmp/test.pl line 60.... 

 ...which points to the 'Socket' module not "playing nicely" with what the the dynamic library loader 'XSLoader' loaded.

 

My suggestions are two: (1) Verify that everything works with a hostname that is <= 8-characters (which I'm sure it will); and (2) consider upgrading to a current Perl version and/or contact IBM support to ascertain how/if they support hostnames in excess of 8-characters.

 

Regards!

 

...JRF...

The opinions expressed above are the personal opinions of the authors, not of HP. By using this site, you accept the Terms of Use and Rules of Participation.