fork in perl


 
Thread Tools Search this Thread
Top Forums Shell Programming and Scripting fork in perl
# 1  
Old 02-23-2012
fork in perl

Can someone tell me perl fork example please. I tried online but could not get proper documentation.
# 2  
Old 02-23-2012
# 3  
Old 02-23-2012
Code:
#! /usr/bin/perl
use warnings;
use strict;

my $x = fork;

if ($x) {
    for (1..5) { print "Parent\n"; sleep 1 }
} else {
    for (1..5) { print "Child\n"; sleep 1}
}

When you run this script, you'll see output as
Code:
$ ./test.pl
Parent
Child
Parent
Child
Child
Parent
Child
Parent
Parent
Child

The process has been forked here and "Parent" and "Child" will be printed together.

The order in which it is printed, i.e., "Parent" and then "Child" or "Child" and then "Parent" depends on how your OS schedules the forked processes.
Login or Register to Ask a Question

Previous Thread | Next Thread

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Need explanation on Perl Fork

Hi, I am breaking my head to understand the below line of code in perl: next if $pid = fork; # Parent goes to next server. die "fork failed: $!" unless defined $pid; Can anyone please explain me in detail as I am a slow learner? Thanks, Ali. (2 Replies)
Discussion started by: liyakathali
2 Replies

2. Programming

Fork!

I understand that fork create a child but I need very simple example that make child useful.... I mean how will make the program faster anyone explain with code plz using C plz (2 Replies)
Discussion started by: fwrlfo
2 Replies

3. Shell Programming and Scripting

fork in perl

Hi, I have a file which has some 50 hosts, I want to login to each host using ssh and execute any command. I am using fork function in perl. I am able to login to each host and execute the command in the hosts paralelly, but it spawing/forking 50 processes at a time. It will consume the cpu... (5 Replies)
Discussion started by: Anjan1
5 Replies

4. UNIX for Dummies Questions & Answers

fork()

I'm trying to run a simple test on how to use fork(), i'm able to execute the child process first then the parent, but how can I execute parent then child..? Thanks! (1 Reply)
Discussion started by: l flipboi l
1 Replies

5. Shell Programming and Scripting

Perl fork

Hi, I want to exec three different functions in perl one per fork(); How can I determine that this it the third fork and I should use third function in it. if ($pid = 0) { first();} else ( #parent second(); ) How to run third function? (1 Reply)
Discussion started by: mirusnet
1 Replies

6. Shell Programming and Scripting

new to perl.. how do I do this ? fork/ threads ?

I have never coded in perl before (just started today morning :). I need to write a perl program to automate a task. Here is how I do it manually: Start a program in my home dir. Now if I want to execute another program while this one is still running, what I would do is go to another... (6 Replies)
Discussion started by: the_learner
6 Replies

7. Programming

fork() help

Hi everybody, I wanna write a code to understand how fork works. my target -------------- -Parent creates a file(called temp) and writes into this file "1".Then it closes the file. -Then parent creates a child and wait until execution of this child ends. -Then child opens the same... (3 Replies)
Discussion started by: alexicopax
3 Replies

8. Programming

Fork ()

hi all About this code for (i = 1; i < n; i++) if ((childpid = fork()) <= 0) break; I really can't understand the output . and the way fork () return the value . how about the process Id ,the child process Id and the parent ID in this case so please answer me soon (5 Replies)
Discussion started by: iwbasts
5 Replies

9. Programming

Fork or what?

Hello all. I'm developing a filetransfer application, which is supposed to work sort of like dcc, with multiple transfers etc. Now i wonder what the best way to manage the transfers is. Should i fork() for each new transfer, hogging loads of memory or use pthreads? Maybe I can use select to see... (0 Replies)
Discussion started by: crippe
0 Replies

10. Programming

fork()

#include <stdio.h> #include <string.h> #include <sys/types.h> #define MAX_COUNT 200 #define BUF_SIZE 100 void main(void) { pid_t pid; int i; char buf; fork(); pid = getpid(); for (i = 1; i <= MAX_COUNT; i++) { sprintf(buf,... (2 Replies)
Discussion started by: MKSRaja
2 Replies
Login or Register to Ask a Question