data1;
if(some condition1 = 1) then
read this data 2;
end if;
if (some condition2 = 0) then 
read this data 3;
read data 4;
end if;
if(some condition3 = 11) then
read this data 5;
data 6;
end if;
if (some condition2 = 0) then 
read this data 6;
end if;

##</code><code>##

read this data 3;
read data 4;
read this data 6;

##</code><code>##

open(WORDLIST, <*.doc>);
while(<WORDLIST>)
if(/if/)
{
if(/condition 2/)
 {print "$_";
 }	
 else{}
}
open(WORDLIST);