$u= qr/.*(?=U)(?:URL="([^"]*)")?/s # moves to just before 'U'