How about just not offering invalid entries? Did you consider bash's (assuming this is your shell) select statement? Like
Press <CTRL>D to exit the loop. Or, provide an extra item to quit.
Hi all,
I wanted to know how to install oracle on solaris (b83)..
I also would like to know of a link that i can download oracle from?
please reply fast..
I need it for my exams day after tomorrow...
please reply (1 Reply)
Dear Experts,
Please find below the script in perl and can any body convert this script exactly in to oracle 9i fiunction which will return the required result same as perl.
#!/usr/bin/perl
$nof=@ARGV;
@var2 = ();
for($n=0; $n<$nof; $n++)
{
$filename = @ARGV;
open... (3 Replies)
Hi guys ,
I have a file which contains following string.(filename tempdisplay)
(location 0.0.0.0:5900)
i needed to write a script which will extract the string that comes after
0.0.0.0 i.e the string :5900.
I have used following method to extract the string :5900 .Is it a preferred way of... (4 Replies)
Hi,
Please see contains both files created for automating the data from oracle through shell.
1)a_p.ksh
#!/bin/ksh
LOG=/home/A_P.log
MESSAGE=/home/MESSAGE_A_P.txt
mail_list=/home/AP_MAIL_LIST.txt
data=/home/spooled_A_P.log
echo "`date` Starting execution for A_P COUNT" > $LOG
... (2 Replies)
Hi all,
I'm using Solaris 10, and need help in sorting the below output from the syslog file in descending rather than ascending order.
I would like both the hostname and message columns to be sorted, but right now only the message is sorted and the count column, whose order I would like... (2 Replies)
Hello,
I am new to UNIX.
My Requirement: Need to connect to Oracle database from UNIX and execute an SELECT statement and store the records in a flatfile of Comma delimiter.
What I have Succeeded: I was able to connect to Oracle from UNIX.
Problem: I cannot fetch multiple... (3 Replies)
Hi All,
i have a file with below contents (single line) pasted below
http://www.w3.org/2001/XMLSchema-instance" xsi:schemaLocation="http://www.grid-pnp.org/2005/11/gpnp-profile gpnp-profile.xsd" ProfileSequence="4" ClusterUId="a412e044b1986f00bfb208e0b89d90bf" ClusterName="lab1-cluster"... (3 Replies)
Hi All,
Need your help in resolving the below issue.
I've a file called "data.txt" with the below lines:
TT: <tell://me/sreenivas>
<tell://me/100>
<tell://me/500>
TT: <tell://me/sudheer>
<tell://me/300>
TT: <tell://me/sreenivas>
<tell://me/200>
TT:... (6 Replies)
Hello Folks,
I'm working on a requirement to automate the process of generating report(csv file) using metadata info stored in an Oracle table and E-mail it to respective people.
Meta data table:
Report_ID,Report_SUB_ID,Report_DB,Report_SQL,Report_to_email_Id
1,1,DEV,'select * From... (2 Replies)
hello
when a write this code
$ ps -fea | grep pmon
result:
root 1515 1 0 Feb 9 ? 0:10 ipmon -sD
oracle9i 18357 1 0 Feb 9 ? 1:04 ora_pmon_db1_PROD
oracle9i 22830 1 0 Feb 9 ? 0:17 ora_pmon_db2_PROD
oracle9i 22859 1 0 Feb 9 ? ... (4 Replies)
Discussion started by: ceciaide
4 Replies
LEARN ABOUT DEBIAN
io::async::pid
IO::Async::PID(3pm) User Contributed Perl Documentation IO::Async::PID(3pm)NAME
"IO::Async::PID" - event callback on exit of a child process
SYNOPSIS
use IO::Async::PID;
use POSIX qw( WEXITSTATUS );
use IO::Async::Loop;
my $loop = IO::Async::Loop->new;
my $kid = $loop->fork(
code => sub {
print "Child sleeping..
";
sleep 10;
print "Child exiting
";
return 20;
},
);
print "Child process $kid started
";
my $pid = IO::Async::PID->new(
pid => $kid,
on_exit => sub {
my ( $self, $exitcode ) = @_;
printf "Child process %d exited with status %d
",
$self->pid, WEXITSTATUS($exitcode);
},
);
$loop->add( $pid );
$loop->run;
DESCRIPTION
This subclass of IO::Async::Notifier invokes its callback when a process exits.
For most use cases, a IO::Async::Process object provides more control of setting up the process, connecting filehandles to it, sending data
to and receiving data from it.
EVENTS
The following events are invoked, either using subclass methods or CODE references in parameters:
on_exit $exitcode
Invoked when the watched process exits.
PARAMETERS
The following named parameters may be passed to "new" or "configure":
pid => INT
The process ID to watch. Must be given before the object has been added to the containing "IO::Async::Loop" object.
on_exit => CODE
CODE reference for the "on_exit" event.
Once the "on_exit" continuation has been invoked, the "IO::Async::PID" object is removed from the containing "IO::Async::Loop" object.
METHODS
$process_id = $pid->pid
Returns the underlying process ID
$pid->kill( $signal )
Sends a signal to the process
AUTHOR
Paul Evans <leonerd@leonerd.org.uk>
perl v5.14.2 2012-10-24 IO::Async::PID(3pm)