if($pword==$cpword){
	
	open (FILE, "memberlist.txt");
	
	while(<FILE>){
	push @lines,$_;
	
	close FILE;
}	
}


##</code><code>##

open (FILE, "memberlist.txt") || die "Cannot open: $!";