How can i analyze the program and get these values automatically?

Without looking too hard, Memoize-it to get them by running the function, or through "static" analysis with PPI because since Perl::Critic::Policy is xpaths

paste your program into wxPPIxregexplain.pl