$_ = "2012-01-12";
print $1 while /(\d)/g;