Trying to understand this piece of code

[sudhindra k s]

  
Hi

Can someone please tell me what the following code is trying to do 


      if ( /CR List/ .. /\(2\)/ ) {
         if ( /CR List/ )  { print " $'\n"; }
         elsif ( /\(2\)/ ) {print " $` \n" ;}
         else              { print "            $_\n";}
        }

I know that it is trying to print whatever is there between CR List and (2). But i am 
not able guess more than that. 

Regards
Sudhindra