정규식은 Tcl의 16 진수와도 일치합니까?

Question

문자열이 16 진수인지 확인하기 위해 Tcl 정규식을 작성 하시겠습니까?

Answer 1

이 TCL 코드가 작동 할 것입니다 :

if {[regexp -linestop -nocase {^[\da-f]*[02468ace]$} $input]} { 
    # Success 
} else { 
    # Fail 
} 

참고 A, C와 E는 짝수이고, 당신이 -nocase는 A-F뿐만 아니라-F와 일치해야한다는 것을.

Answer 2

정규식이어야합니까?

proc is_even {n} {expr {($n & 1) == 0}} 

if {[is_even 0xdeadbeef]} {puts even} else {puts odd}