Select Code to Download

#!/usr/bin/perl -w
use strict;
...
{more statements};
while(X){}

#!/usr/bin/perl -w
use strict;
...
while(  condition1 &&  condition2 ||  condition3 ) 
{ #statements; }
more statements;