berng

Попробуйте так:
Варианты строк:
$a="ADD sfdsf"
или
$a="ADD 123 sfdsf"

Регулярка (на перле):
if($a =~ /ADD\s+(\d)+[^\d].+/)
или так:
if($a =~ /ADD\s+[\d]+[^\d].+/)

проверяете только одну регулярку, она вернет ложь в первой строке, и истину - во второй.