SELECT * 

##</code><code>##

my $sql="HERE_DOC;
	SELECT p.userID, LEN(p.passwd) 
	FROM password p
	WHERE LEN(p.passwd)<6 
	GROUP BY p.userID;

HERE_DOC"

##</code><code>##

if ( !CheckPass() ){
	#bail
}else{
	# continue 
}

##</code><code>##

    use constant SCRIPT_DB	   => 'script_db' #
    use constant PASSWORD_TABLE    => 'passwd';   # 

##</code><code>##

open FILE, $q->param('File')