Help with Perl script

[Stephen Gilbert]

Try:

open (INPUT,"metastat|");

Dave Martini wrote:
> I'd like to run a command called metastat and have it search its output
> for the word Ok but what I have so far doesn't work. Anyone have any
> suggestions?
> Thanks much.
> Dave.
>
>
> #!/bin/perl
> $target = "Ok";
> open(INPUT, "<'metastat'");
> while (<INPUT>) {
>         if (/$target/) {
>                 print  "Found $target\n";
> }
> }
> close(INPUT);
>