app_perl: update constants for debug levels
(cherry picked from commit 6513ee05dd20253c0f555b18081f0eceb4baf7aa)