foreach my $key (%num) {

            
            if($order == 2 ){
   
	    $sql = "SELECT * FROM admin WHERE day = '$d' AND month = '$m_num' and year = '$y' AND NUM = '$num' AND status= '2' ORDER BY name";
           
           }else{
   
            $sql = "SELECT * FROM admin WHERE day = '$d' AND month = '$m_num' and year = '$y' AND NUM = '$num' AND status= '2'";		    
            
            }
            
	    $sth = $dbh->prepare($sql);
	    $sth->execute() || die $sth->errstr;
	    
                        
	    while ($pointer = $sth->fetchrow_hashref)
	    {
	     my $num=$pointer->{'NUM'};
	     my $name=$pointer->{'name'};
	    }
	    
	    print "NAME = $name<br>";
	    
}