If you just want to suppress the output and not do anything with it you can redirect it to /dev/null:

system("/some/program >/dev/null");
[download]

my $output = `/some/program`;
[download]

If your program has a lot of output that is better captured as it arrives you can use piped open:

open(my $handle, "/some/program|") or die;
while (<$handle>) {
  # do stuff with a line
}
[download]

See also perlopentut and perlipc.

That was too easy...next time I'll ask a harder question. For anybody else who has the same question as me...NUL is the windows equivalent of /dev/null.

File::Spec->devnull() is the cross-platform way to get /dev/null.

use strict;
use warnings;

my $nmapCmd = q{/path/to/nmap -and -any -args};
open my $nmapFH, q{-|}, $nmapCmd
   or die qq{fork: $nmapCmd: $!\n};

while ( <$nmapFH> )
{
    chomp;
    # Do something with nmap output here
    ...
    print qq{Sanitised stuff for user\n};
}

close $nmapFH
   or die qq{close: $nmapCmd: $!\n};
[download]

I hope this is of use.

Cheers,

JohnGG