perl.beginners
  Home FAQ Contact Sign in
perl.beginners only
 
Advanced search
May 2008
motuwethfrsasuw
   1234 18
567891011 19
12131415161718 20
19202122232425 21
262728293031  22
2008
 Jan   Feb   Mar   Apr 
 May   Jun   Jul   Aug 
 Sep   Oct   Nov   Dec 
2008 2007 2006  
total
perl.beginners Profile…
RELATED GROUPS

POPULAR GROUPS

more...

 Up
  OT: help crle ruin my solaris :-(         


Author: Beast
Date: May 4, 2008 20:38

I've just want to avoid setting $LD_LIBRARY_PATH everytime i run my perl,
however after doing crle (i forgot the -u !)

root# crle -l /usr/local/rrdtool-1.2.19/lib

now all command refused to run (ls, cd etc)

Somebody kind enough to help fix this pls?
Now i can't do su or login as root, but still has user login.

;-(

user$ ls
ld.so.1: ls: fatal: libsec.so.1: open failed: No such file or directory
Killed

Thanks.

--budhi

first, i try to use:

$ENV{LD_LIBRARY_PATH} = "/usr/local/rrdtool-1.2.19/lib";

but it won't work...
1 Comment
  generating number ranges using rand function         


Author: Aruna Goke
Date: May 4, 2008 08:09

I have worked on the code below and am able to generate the 15digit
lenght required .

However, what i wish to achieve is to make sure all the output comes out
in 15 digits each. a sample of my output is as below.

Can someone guide on how to make all come out in 15digits.

Thank you.

Goksie

#!/usr/bin/perl

use warnings;
use strict;
use Perl6::Say;
Show full article (0.83Kb)
5 Comments
  question on unblocking the signals         


Author: J. Peng
Date: May 4, 2008 01:41

Hello,

Please see the code below.
I block the signals in statement 1, and unblocked it in parent
(statement 2) and child (statement 3).
But, is the statement 2 needed or not?
Should I unblock it once in child or twice in both parent and child?
(if unblocking once is enough, then I believe parent and child will
share the signals).

Thanks!

while (!$DONE)
{
next unless my $sock = $listen_socket->accept;

my $signals = POSIX::SigSet->new(SIGHUP,SIGINT,SIGTERM,SIGCHLD);
sigprocmask(SIG_BLOCK,$signals); # statement 1

my $child = fork();
die "[EMERG] can't fork $!\n" unless defined $child;

if ($child) {
$status{$child} = 1;
sigprocmask(SIG_UNBLOCK,$signals); # statement 2
Show full article (1.29Kb)
no comments