s!(\d+)/(\d+)/(\d+)!sprintf"%04d-%02d-%02d",$3,$2,$1!e;