foreach my $pation (@occupation) {
   `ps -ef|grep -i $pation|grep -v grep|wc -l`;
}