Mini Shell
Mini Shell
| Direktori : /home/opti/optisoftcom/.cpanm/work/1544535406.20768/Test-NoWarnings-1.04/t/ |
| Current File : /home/opti/optisoftcom/.cpanm/work/1544535406.20768/Test-NoWarnings-1.04/t/06_fork.t |
#!/usr/bin/perl
use strict;
use Test::More tests => 2;
use Test::NoWarnings;
pass("just testing");
# if it's working properly, only the parent will conduct a warnings test
my $pid = fork;
die "Forked failed, $!" unless defined $pid;