jdk
jhfk

##</code><code>##

process jkdgf
jdk
jhfk
end process

##</code><code>##

use strict;
use warnings;

my $print_flag = 0;
while (<DATA>) {
	if (/end process/) {
		last;
	}
	elsif (/process/) {
		$print_flag = 1;
	}
	else {
		print if $print_flag;
	}
}

__DATA__
ghklg
process jkdgf
jdk
jhfk
end process

##</code><code>##

C:\Perl\src>perl 721648.pl
jdk
jhfk