Help for this page

Select Code to Download


  1. or download this
    use strict;
use warnings;
...

my  $server = MyWebServer->new(8080);
our $pid    = $server->background();
  2. or download this
    package MyWebServer;

...
}

1;
  3. or download this
    use strict;
use warnings;
...

my $server        = MyWebServer->new(8080);
$MyWebServer::pid = $server->background();
  4. or download this
    package MyWebServer;

...
}

1;
  5. or download this
    use strict;
use warnings;
...

my $server = MyWebServer->new(8080);
Pid->set($server->background());
  6. or download this
    package MyWebServer;

...
}

1;
  7. or download this
    package Pid;

...
}

1;