my ($match) = $current =~ m/$start\s*(.*)\s*$end/s;