for ($y = 0; $y < $length ; $y++ ) { 
		my($arg);
 		$arg = $_[$y];  
		if ( length $arg == 1 ) {
			$and = $and . " AND j$y.LumbolValue = '$arg' " ; 
		} elsif ( $arg eq "vowel\n"){ 
			$and = $and . " AND j$y.Vowel = 1 " ;   
		} elsif ( $arg eq "consonant\n"){ 
			$and = $and . " AND j$y.Consonant = 1 " ;  
		} elsif ( $arg eq "alpha\n"){ 
			$and = $and . " AND j$y.Letter = 1 " ; 
		} else  {
			$and = $and . " /* else:  y: $y arg: [$arg] */  " ;
		}
	} 

##</code><code>##

/* else: y: 0 arg: [vowel] */ /* else: y: 1 arg: [c] */ /* else: y: 2 arg: [e] */ /* else: y: 3 arg: [consonant] */