13
Don't quite understand the question. Do you just want to extract the number?
question_(\d+)
in perl you could do something like:
my $string = 'question_1';
my $question_number = $string =~ /question_(\d+)/i;
now $question_number will hold the int if it matches and will be undef if it doesn't
If the underscore and the number are optional try something like this:
question(?:_\d)?