Help needed!!! Perl went for nuts

[Igor I. Shulz]

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?

[Arunvijai_4 · Accepted solution]

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

[Igor I. Shulz]

:-((

# 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>

[Igor I. Shulz]

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>

[H.Merijn Brand (procura]

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

[Igor I. Shulz]

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>

[Igor I. Shulz]

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

[Muthukumar_5]

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

[Igor I. Shulz]

# 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

[Muthukumar_5]

Try as,

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

# perl -W test.pl

what you are getting?

--
Muthu

[Igor I. Shulz]

# perl -W test.pl
#

err.log is not created

[Arunvijai_4]

Just a thought, Reinstalling perl may help...

-Arun

[Muthukumar_5]

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

[Igor I. Shulz]

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.

[Arunvijai_4]

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