For bash you can try:
If it is ok to just have a list instead of an array you could pipe the output of ls into a while/read loop to work on the single elements.
I would like to extend a logical drive on our 3510. I have four unallocated disks which I would like to use for this purpose.
The 3510 supports a Sun Cluster but for now all I wish to see is a "new" disk when I run format.
I am a little familiar with the telnet/ssh session on the 3510 but am... (2 Replies)
firstly, i check is the variable empty or not, if so
vesselNameList=`echo $vesselName`
if not
vesselNameList="${vesselNameList}""\n"`echo "$vesselName"`
and it produces this result
BUNGA TERATAI 3 5055\
JADE TRADER 143W\
MOL SPLENDOR 0307A
BUNGA TERATAI 3 5055\
JADE... (1 Reply)
Hi ,
I 'm trying to check if multiple directories exist on a server, if not create the missing ones and print " creating missing directory.
how to write this in a simple script, I have made my code complex
if ; then
taskStatus="Schema extract directory exists, checking if SQL,Count and... (7 Replies)
I've been working with Solaris/Linux for about 4 months now. Let me explain the scenario. There will be two users involved. The owner (curOwner) and the new user (newUser). The server in question is a Solaris 10 box.
So curOwner runs an application that is constantly writing logs to lets say.... (2 Replies)
Hi,
I have a directory /home/datasets/ which contains a bunch (720) of subdirectories called hour_1/ hour_2/ etc..etc.. in each of these there is a single text file called (hour_1.txt in hour_1/ , hour_2.txt for hour_2/ etc..etc..) and i would like to do some text processing in them.
Each of... (20 Replies)
Hi,
Very unfamiliar with unix/linux stuff. Our admin is on vacation so, need help very quickly.
I have directories (eg 40001, 40002, etc) that each have one subdirectory (01).
Each subdir 01 has multiple subdirs (001, 002, 003, etc). They are same in each dir.
I need to keep the top and... (7 Replies)
Hi All,
I have a list of words (these are actually a list of database table names separated by comma).
Now, I want to find only the non-existing list of words in the *.java files of current directory and/or its sub-directories.
Sample list of words:... (8 Replies)
How can I have an intelligent script that will copy from source to destination directory if the file doesnt exist there or the chksum is not match.
SOURCE directory:
for i in `ls`
> do
> echo $i
> md5sum $i
> echo ""
> done
asdasda
00039a616135792fb609d04cf27aed95 asdasda
... (5 Replies)
Hi Experts
I need your help to optimize my script to execute better as I have nearly 1M records & the script is taking close to 40 minutes to execute, so would need support on a faster alternative.
Input: file
{"house":"1024","zip":"2345","city":"asd","country":"zzv"}... (2 Replies)
Discussion started by: nk1984
2 Replies
LEARN ABOUT DEBIAN
io::async::routine
IO::Async::Routine(3pm) User Contributed Perl Documentation IO::Async::Routine(3pm)NAME
"IO::Async::Routine" - execute code in an independent sub-process
SYNOPSIS
use IO::Async::Routine;
use IO::Async::Channel;
use IO::Async::Loop;
my $loop = IO::Async::Loop->new;
my $nums_ch = IO::Async::Channel->new;
my $ret_ch = IO::Async::Channel->new;
my $routine = IO::Async::Routine->new(
channels_in => [ $nums_ch ],
channels_out => [ $ret_ch ],
code => sub {
my @nums = @{ $nums_ch->recv };
my $ret = 0; $ret += $_ for @nums;
# Can only send references
$ret_ch->send( $ret );
},
on_finish => sub {
say "The routine aborted early - $_[-1]";
$loop->stop;
},
);
$loop->add( $routine );
$nums_ch->send( [ 10, 20, 30 ] );
$ret_ch->recv(
on_recv => sub {
my ( $ch, $totalref ) = @_;
say "The total of 10, 20, 30 is: $$totalref";
$loop->stop;
}
);
$loop->run;
DESCRIPTION
This subclass of IO::Async::Process contains a body of code and executes it in a sub-process, allowing it to act independently of the main
program. Once set up, all communication with the code happens by values passed into or out of the Routine via IO::Async::Channel objects.
Because the code running inside the Routine runs within its own process, it is isolated from the rest of the program, in terms of memory,
CPU time, and other resources, and perhaps most importantly in terms of control flow. The code contained within the Routine is free to make
blocking calls without stalling the rest of the program. This makes it useful for using existing code which has no option not to block
within an "IO::Async"-based program.
To create asynchronous wrappers of functions that return a value based only on their arguments, and do not generally maintain state within
the process it may be more convenient to use an IO::Async::Function instead, which uses an "IO::Async::Routine" to contain the body of the
function and manages the Channels itself.
PARAMETERS
The following named parameters may be passed to "new" or "configure":
channels_in => ARRAY of IO::Async::Channel
ARRAY reference of "IO::Async::Channel" objects to set up for passing values in to the Routine.
channels_out => ARRAY of IO::Async::Channel
ARRAY reference of "IO::Async::Channel" objects to set up for passing values out of the Routine.
code => CODE
CODE reference to the body of the Routine, to execute once the channels are set up.
METHODS
This class provides no additional methods, other than those provided by IO::Async::Process.
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2012-10-24 IO::Async::Routine(3pm)