$ perl -E '"aa1_bb2" =~ /_[a-z]+\d/ && say "Yes, it does!"'
Yes, it does!