topic Re: Help needed!!! Perl went for nuts in Operating System - Linux

Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 03:27:52 GMT

I have a server HPUX 11.11 which keeps many perl scripts running (perl 5.8). This night I had to reboot it and after rebooting I found that many of the scripts don't work. It strange - it seems that fork from perl script is broken. This is test fragments:

This is simple prog:

#!/usr/bin/perl -w
system('/usr/bin/ls aaa');

It works fine and $? = 0

But this prog:

#!/usr/bin/perl -w
system('/usr/bin/ls aaa >bbb');

doesn't work, and $?=65280, $!='No such file or directory'

'/usr/bin/ls aaa >bbb' started manually works fine.

What happens?

Re: Help needed!!! Perl went for nuts

Arunvijai_4 — Thu, 16 Feb 2006 03:34:56 GMT

Hello,

can you put the script under perl debgger and see what happens there ? Something like,

#perl -d tmp.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(tmp.pl:2): system('/usr/bin/ls aaa >bbb');
DB<1>

-Arun

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 03:36:22 GMT

:-((

# perl -d a.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(a.pl:2): system('/usr/bin/ls aaa >/tty');
DB<1> n
main::(a.pl:3): print $!,"\n", $?, "\n";
DB<1> p $?
65280
DB<2> p $!
No such file or directory
DB<3>

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 03:38:31 GMT

Sorry:

# perl -d a.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(a.pl:2): system('/usr/bin/ls aaa >bbb');
DB<1> n
main::(a.pl:3): print $!,"\n", $?, "\n";
DB<1> p $?
65280
DB<2> p $!
No such file or directory
DB<3>

Re: Help needed!!! Perl went for nuts

H.Merijn Brand (procura — Thu, 16 Feb 2006 03:59:38 GMT

what is the pwd in that script? is it allowed to write/create bbb?

what happens when you open bbb yourself?

open BBB, "> bbb" or die "Cannot write to bbb: $!\n";
close BBB;
system ("ls aaa > bbb") or die "ls failed: $!";

Enjoy, Have FUN! H.Merijn

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 04:10:01 GMT

open BBB works fine

system - no. File bbb is empty after system ("ls aaa > bbb") or die "ls failed: $!";

die doesn't executed because system returns 65280.

# perl -d a.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(a.pl:10): system ("ls aaa > bbb") or die "ls failed: $!";
DB<1> n
main::(a.pl:12): 0;
DB<1> p $?
65280
DB<2> p $!
No such file or directory
DB<3>

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 04:11:29 GMT

system - no. File bbb not exists after system ("ls aaa > bbb") or die "ls failed: $!";

Re: Help needed!!! Perl went for nuts

Muthukumar_5 — Thu, 16 Feb 2006 04:24:13 GMT

Try as,

# cat test.pl
#!/usr/bin/perl -w
`/usr/bin/ls muthu > /err.log`;

# perl -d test.pl
DB<1> n

what you are getting now?

--
Muthu

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 04:29:23 GMT

# perl -d b.pl

Loading DB routines from perl5db.pl version 1.19
Editor support available.

Enter h or `h h' for help, or `man perldebug' for more help.

main::(b.pl:2): `/usr/bin/ls muthu > /err.log`;
DB<1> n
main::(b.pl:3): 1;
DB<1> p $?
256
DB<2> p $!

DB<3>

/err.log - is not created

Re: Help needed!!! Perl went for nuts

Muthukumar_5 — Thu, 16 Feb 2006 04:34:57 GMT

Try as,

# cat test.pl
#!/usr/bin/perl -w
`/usr/bin/ls muthu > /err.log`;

# perl -W test.pl

what you are getting?

--
Muthu

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 04:41:56 GMT

# perl -W test.pl
#

err.log is not created

Re: Help needed!!! Perl went for nuts

Arunvijai_4 — Thu, 16 Feb 2006 04:42:57 GMT

Just a thought, Reinstalling perl may help...

-Arun

Re: Help needed!!! Perl went for nuts

Muthukumar_5 — Thu, 16 Feb 2006 04:45:51 GMT

Try like,

# cat > test.pl
#!/usr/bin/perl -w
`/usr/bin/ls muthu > /err.log 2>&1`;

# perl test.pl
# cat /err.log

what you are getting. I feel it is a problem with STDERR (2 File descriptor) setup.

--
Muthu

Re: Help needed!!! Perl went for nuts

Igor I. Shulz — Thu, 16 Feb 2006 05:20:29 GMT

Case closed.

It seems that during of reboot /bin (symlink to /usr/bin) was removed (fsck?)

After recreating symlink all orks fine !!!

Thank to all.

Re: Help needed!!! Perl went for nuts

Arunvijai_4 — Thu, 16 Feb 2006 05:22:21 GMT

http://forums1.itrc.hp.com/service/forums/helptips.do?#28