#here is a small test i did with the examples given in OP

use strict;
use warnings;

while(<DATA>){
		
		if ( /set private-key/){
	
		print "\nsetting input seperator to paragraph mode\n";
		local $/ = ""; #record separator will change itself back to default AFTER leaving the if block
		print "skipping encrypted data\n";
		<DATA>;
		print "encrypted data skipped and should not be printed !\n\n";
		next; 
		}
		
	print if /\w+/;
}



__DATA__
random data
more random data
blah blah

one last test BEFORE! encrypted data!

set private-key "-----BEGIN ENCRYPTED PRIVATE KEY-----
sdfkjghsdlkhfgldkfjghldkfjgh
sdflkjgdfgl;kd;lfkgjdlfkgjd;l
dlkjfghlkdfjghldskfjhgldskfjhg

this is AFTER encrypted data
more rand0m data

this is the last test AFTER! encrypted data.