Mega Code Archive

 

Categories / Perl / Regular Expression

 

Determine if a string has a digit

use strict; use warnings; $string = "hello there"; if ( $string =~ /[0-9]/ ) {    print "'$string' has a digit.\n"; } else {    print "'$string' has no digit.\n"; } $string = "this one has a 2"; if ( $string =~ /[0-9]/ ) {    print "'$string' has a digit.\n"; } else {    print "'$string' has no digit.\n"; }