The perl is just script to setup the db.
You can check it by using db commands, just examples...
[root@smeserver ~]# db affa show JobName
[root@smeserver ~]# db affa getprop JobName Include[0]
[root@smeserver ~]# db affa setprop JobName Include[0] /opt