Subject: | investigate and address normalization warnings |
a) t/07.phrase_norm.t
# TODO: Why does the run_32_tests() below do this:
b) Once "a" is done, look for and do this sort of thing (based on t/42_… w/ -w)
- return $str if $str !~ m/\_(\-?[0-9]+)/;
- my @args = __caller_args( $_[1] ); # this way be dragons
+ return $str if !defined $str || $str !~ m/\_(\-?[0-9]+)/;
+ my @args = __caller_args( $_[1] || 0); # this way be dragons