猫オペレーターが使えると柔軟性が出て便利になるよね。

print if /START/ .. /END/; # => START 1 2 END
print if /START/ ..^ /END/; # => START 1 2
print if /START/ ^..^ /END/; # => 1 2

START
1
2
END