Hi ,
I am using ForkManager module for multiprocessing in my code below : -
use Parallel::ForkManager;
$pm = new Parallel::ForkManager($MAX_PROCESSES);
foreach $data (@all_data) {
# Forks and returns the pid for the child:
my $pid = $pm-start and next;
... do some work with
hi list,
I would like to ask about 2 dimensional array
my code:
my $ref = $sth-fetchall_arrayref();
foreach my $row (@$ref) {
( $KODE_UNIT, $KODE_BAGIAN, $NIK, $TANGGAL ) = @$row;
@row = @$row;
push(@array_2d, @row );
print tr;
print td align=center valign=middle
-Original Message-
From: Eko Budiharto [mailto:eko.budiha...@gmail.com]
Sent: Friday, March 30, 2012 6:33 AM
To: beginners@perl.org
Subject: [question] array
hi list,
I would like to ask about 2 dimensional array
my code:
my $ref = $sth-fetchall_arrayref();
foreach my $row
On 2012-03-30 12:33, Eko Budiharto wrote:
I would like to ask about 2 dimensional array
Each element of a Perl array is a scalar.
my @colors = ( red, white, blue );
which can also be written as:
my @colors = qw( red white blue );
and can be used as:
print ok if $colors[ 2 ] eq
On 2012-03-30 11:14, punit jain wrote:
my $file = /tmp/test;
die \n Killed as filed doesnot exist \n if(-e $file);
It looks like you have to reverse your test.
-e $file
or die [$$] exit early because '$file' doesn't exist\n;
But why even start a child, if its data