pos = rindex($_, $start);
m/\Q$start\E(.*?)\Q$end\E/gs;
print $1;