$.=$.*$_%$' or last for<>=~$"..$`;print$.