How to create a threaded process in Perl. I need explanation for this
code from Advanced Perl Programming....
# Forking server
use IO::Socket;
$SIG{CHLD} = sub {wait ()};
$main_sock = new IO::Socket::INE T (LocalHost => 'goldengate',
LocalPort => 1200,
Listen => 5,
Proto => 'tcp',
Reuse => 1,
);
die "Socket could not be created. Reason: $!\n" unless ($sock);
while ($new_sock = $main_sock->accept()) {
$pid = fork();
die "Cannot fork: $!" unless defined($pid);
if ($pid == 0) {
# Child process
while (defined ($buf = <$new_sock>)) {
# do something with $buf ....
print $new_sock "You said: $buf\n";
}
exit(0); # Child process exits when it is done.
} # else 'tis the parent process, which goes back to accept()
}
close ($main_sock); 1 3095
"SRam" <ak**********@y ahoo.com> wrote in message
news:20******** *************** ***@posting.goo gle.com... How to create a threaded process in Perl. I need explanation for this code from Advanced Perl Programming....
First of all... you probably should take this over to comp.lang.perl. misc.
People complain that this group doesn't exist, you you may get better
answers over there.... # Forking server use IO::Socket; $SIG{CHLD} = sub {wait ()}; $main_sock = new IO::Socket::INE T (LocalHost => 'goldengate', LocalPort => 1200, Listen => 5, Proto => 'tcp', Reuse => 1, ); die "Socket could not be created. Reason: $!\n" unless ($sock);
I'm guessing that $sock should be $main_sock
while ($new_sock = $main_sock->accept()) { $pid = fork(); die "Cannot fork: $!" unless defined($pid); if ($pid == 0) { # Child process while (defined ($buf = <$new_sock>)) { # do something with $buf .... print $new_sock "You said: $buf\n"; } exit(0); # Child process exits when it is done. } # else 'tis the parent process, which goes back to accept() } close ($main_sock);
Advanced Perl Programming has a short description after the segment of code.
You didn't say what you don't understand: the code, the way a server works,
why the code always died? If you say what you don't understand... maybe you
can get a better answer. This thread has been closed and replies have been disabled. Please start a new discussion. Similar topics |
by: Hopeless A |
last post by:
We are attempting to fork a php script into a background php script and
have the first scrip continue to completion. Is this even possible in
the windows version of php? We have used the many code snippets
floating around on the Internet claiming to fork on Windows, yet we
never get it to work properly, sometimes ending up with hunderds of...
|
by: Eric S. Johansson |
last post by:
I was working on a filter for postfix and instead of using the "fork a
new python process on every message" route, I decided to use the SMTP
interface instead and try forking after having started the Python process.
obviously, I needed some way to receive and processed SMTP. smtpd.py
works OK if you are willing to use single threaded one at...
|
by: SRam |
last post by:
I a writing Forking Server for a Small application..
This is code for multiplexing
my $listen = IO::Socket::INET->new(Proto => 'tcp',LocalPort => 2323,
Listen => 1, Reuse => 1)
or die $!;
$listen->autoflush(1);
|
by: Sophia Cao |
last post by:
Hello,
I am seeking a python solution for my project. I am trying to
implement an architecture where there is a server who receives incoming
messages from several clients, then those messages need to be written
to a MySQL database. To avoid too many connections to the database, I
plan to save the incoming messages into a queue, while use...
|
by: felixfix |
last post by:
Hi all,
I am just wondering if something is wrong with my program. What it
bascially does is to output a fibonacci sequence base on the
command-line output. If I give a 5, it will generate the first 5
fibonacci number. The problem is, I thought the parent process will
always go first, and so here I should get "0, 1, 1, 2, 3" But I ran the
...
| |
by: czajnik |
last post by:
Hi!
I'm quite new to Python development. Can someone advise me a framework
useful for building (pre-)forking or threaded TCP servers, other than
SocketServer ? I've seen source code of a few python-based app servers,
all of theme seem to reinvent the wheel, eventually reusing
SocketServer. I'd appreciate a framework with logging,...
|
by: qwertycat |
last post by:
I'm new to multi-process programming, should one avoid forking
children from children of a parent?
I'd like to spawn 10 children from the parent and each of those
children spawns another 5 children which process chunks of data (200
rows) with heavy usage of CPU and regexp
|
by: Gilles Ganault |
last post by:
Hello
I'd like to rewrite the following Perl script in Python:
http://www.voip-info.org/wiki/view/Asterisk+NetCID
It seems like the following doesn't actually fork, so Asterisk is
stuck until the script ends:
===========
|
by: Scottman |
last post by:
I am writing a server daemon that forks a child for every incoming
request. The child process terminates when the client closes the
connection. My problem is that I am unsure how to prevent the child
process from becoming defunct. Here is an over-simplified main
function...
int main(void) {
// Daemonize
int pid;
|
by: Hystou |
last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can effortlessly switch the default language on Windows 10 without reinstalling. I'll walk you through it.
First, let's disable language...
|
by: Oralloy |
last post by:
Hello folks,
I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>".
The problem is that using the GNU compilers, it seems that the internal comparison operator "<=>" tries to promote arguments from unsigned to signed.
This is as boiled down as I can make it. ...
| |
by: Hystou |
last post by:
Overview:
Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For...
|
by: agi2029 |
last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then...
|
by: conductexam |
last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one.
At the time of converting from word file to html my equations which are in the word document file was convert...
|
by: TSSRALBI |
last post by:
Hello
I'm a network technician in training and I need your help.
I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs.
The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols.
I succeeded, with both firewalls in...
|
by: adsilva |
last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
|
by: 6302768590 |
last post by:
Hai team
i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
| |
by: bsmnconsultancy |
last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating...
| |