$number =~ m/[0-9]*/;