$path =~ (m/\d+$/);