Code:
$regex($nick,/^`?[A-Za-z]_\d{7}$/)


I assume.