expr "$var" : '[[:digit:]]*$'