This is the output from top and htop. Each thread has it's own PID according to those:
$ top -Hbn1 | grep Control
16330 root 20 0 200444 74912 5776 S 5.5 7.9 0:06.74 Control.pl
16316 root 20 0 200444 74912 5776 S 0.0 7.9 0:02.23 Control.pl
16322 root 20 0 200444 74912 5776 S 0.0 7.9 0:00.00 Control.pl
16323 root 20 0 200444 74912 5776 S 0.0 7.9 0:00.69 Control.pl
16324 root 20 0 200444 74912 5776 S 0.0 7.9 0:01.61 Control.pl
16325 root 20 0 200444 74912 5776 S 0.0 7.9 0:00.70 Control.pl
16326 root 20 0 200444 74912 5776 S 0.0 7.9 0:01.60 Control.pl
16327 root 20 0 200444 74912 5776 S 0.0 7.9 0:00.00 Control.pl
16329 root 20 0 200444 74912 5776 S 0.0 7.9 0:00.08 Control.pl
$ htop
16312 root 20 0 6184 3024 2716 S 0.0 0.3 0:00.02 │ │ └─ sudo ./Control.pl
16316 root 20 0 195M 74912 5776 S 3.3 7.9 0:09.58 │ │ └─ /usr/bin/perl ./Control.pl
16330 root 20 0 195M 74912 5776 S 2.3 7.9 0:04.29 │ │ ├─ /usr/bin/perl ./Control.pl
16329 root 20 0 195M 74912 5776 S 0.0 7.9 0:00.05 │ │ ├─ /usr/bin/perl ./Control.pl
16327 root 20 0 195M 74912 5776 S 0.0 7.9 0:00.00 │ │ ├─ /usr/bin/perl ./Control.pl
16326 root 20 0 195M 74912 5776 S 0.5 7.9 0:01.03 │ │ ├─ /usr/bin/perl ./Control.pl
16325 root 20 0 195M 74912 5776 S 0.0 7.9 0:00.45 │ │ ├─ /usr/bin/perl ./Control.pl
16324 root 20 0 195M 74912 5776 S 0.5 7.9 0:01.04 │ │ ├─ /usr/bin/perl ./Control.pl
16323 root 20 0 195M 74912 5776 S 0.0 7.9 0:00.44 │ │ ├─ /usr/bin/perl ./Control.pl
16322 root 20 0 195M 74912 5776 S 0.0 7.9 0:00.00 │ │ └─ /usr/bin/perl ./Control.pl
|