Help for this page

Select Code to Download


  1. or download this
    my ($shell, $code) = mystical_extraction_goes_here($check{CHECK_CODE})
    +;
    open my $fh, '-|', $shell, -c => $code or die "Can't run shell $shell:
    + $!";
    my @return = <$fh>;
    close $fh;
    
  2. or download this
    my @cmd = $check{SHELL};
    if (exists $check{SH_OPTS}) {
    ...
    }
    open my $fh, '-|', @cmd or die "Can't run check code: $!";
    #...