m[^ \d (?: (?<! \x20 ) \d | \x20 ){19} $]x

##</code><code>##

print m[^ \d (?: (?<!\x20) \d | \x20 ){19} $]x 
    ? 'Yes:' . $_ 
    : ' No:' . $_ 
    for @t;

 No:     123451234512345
 No:  123451234512345
Yes:123451234512345
Yes:1234512345
 No:123 451 2345
 No: