...
use strict;
use warnings;

my $prozesse = "D:/bin/pv.tmp";
system ('D:/bin/pv.exe -l java.exe > $prozesse');
open PROZESSE, "<$prozesse";
my @prozesse = <PROZESSE>;
close (PROZESSE);   

if ("@prozesse" =~ /perl.exe/)  {
  print "Der Prozess ist aktiv\n";
  print "@prozesse\n";
  }
else {
  print "Der Prozess ist nicht aktiv\n";
  }