Perl: Can range operator work in greedy way?

I want to print the following:
START
111
222
333
END
asdfdak
asdfkjas
END

The normal way
print if(/START/ … /END/)
will only print
START
111
222
333
END

But I want to print from START to the last END

Is there