open FH, "diskpart rescan |" or die "open diskpart|: $!"
while (<FH>)
{
    . . .
}
close FH;