for my $line (`pvscan`) {
    ...
};