On Dec 10, 2003, at 4:52 PM, Dan Anderson wrote:
I am learning about forks, so I tried the following code to make sure I
had everything down:
#! /usr/bin/perl
use strict;
use warnings;
my $counter = 1;
my $pid = 0;
while ($counter < 50) {
if ($pid = fork) {
open ("FORKED", ">./fork/$counter
Dan Anderson wrote:
> I am learning about forks, so I tried the following code to make sure I
> had everything down:
>
> #! /usr/bin/perl
>
> use strict;
> use warnings;
>
> my $counter = 1;
> my $pid = 0;
>
> while ($counter < 50) {
> if ($pid = fork) {
> open ("FORKED", ">./fork/$count
On Wed, 2003-12-10 at 17:04, James Edward Gray II wrote:
> On Dec 10, 2003, at 3:52 PM, Dan Anderson wrote:
>
> > I am learning about forks, so I tried the following code to make sure I
> > had everything down:
>
> Still don't believe me about Network Programming with Perl, eh? Did I
> mention
On Dec 10, 2003, at 3:52 PM, Dan Anderson wrote:
I am learning about forks, so I tried the following code to make sure I
had everything down:
Still don't believe me about Network Programming with Perl, eh? Did I
mention that it covers forking well?
Basic idea of fork:
if ($pid = fork()) {
Dan Anderson writes:
> I am learning about forks, so I tried the following code to make sure I
> had everything down:
>
> #! /usr/bin/perl
>
> use strict;
> use warnings;
>
> my $counter = 1;
> my $pid = 0;
>
> while ($counter < 50) {
> if ($pid = fork) {
> open ("FORKED", "
I am learning about forks, so I tried the following code to make sure I
had everything down:
#! /usr/bin/perl
use strict;
use warnings;
my $counter = 1;
my $pid = 0;
while ($counter < 50) {
if ($pid = fork) {
open ("FORKED", ">./fork/$counter")
or die("COULD NOT OPEN FORK");
pri