I tried to fork the process in Subroutine A and called the subroutine B from the child but didn't worked.

You haven't shown how you tried using fork, so it's hard to tell why it failed...

Anyhow, here's a way using it that should fit your specs: 

#!/usr/local/bin/perl -w
use strict;
use Time::HiRes qw(usleep time);

sub doit {
    my $n = shift;
    printf STDERR "%.3f: $n. [$$] %s doing something...\n",
                  time(), (caller(1))[3];
    usleep(5e5); 
}

sub A {
   doit(1);
   doit(2);
   doit(3);
   my $pid = fork();  die $! unless defined $pid;
   if (!$pid) {
       B();
       exit;
   }
   doit(4);
   doit(5);
   kill 9, $pid;   # stop parallel process
   wait;
}

sub B {
   doit(1);
   doit(2);
   doit(3);
   doit(4);
   doit(5);
}

A();

__END__
1325026859.241: 1. [24625] main::A doing something...
1325026859.741: 2. [24625] main::A doing something...
1325026860.241: 3. [24625] main::A doing something...
1325026860.742: 1. [24626] main::B doing something...
1325026860.743: 4. [24625] main::A doing something...
1325026861.243: 2. [24626] main::B doing something...
1325026861.243: 5. [24625] main::A doing something...
1325026861.743: 3. [24626] main::B doing something...

[download]

(Of course, you could also send a less drastic signal than "9" to stop the other process.)

In reply to Re: How to create a parallel communication with 2 subroutine by Eliya
in thread How to create a parallel communication with 2 subroutine by romy_mathew

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.