Select Code to Download

use Win32::Process qw( HIGH_PRIORITY_CLASS );

...

$proc->SetPriorityClass(HIGH_PRIORITY_CLASS)
   or die($^E);