[Perl]Return value is not empty when passing a not exist type to table_info

$dbh->do("CREATE TABLE aaa(id INT NOT NULL,phone VARCHAR(10));") or die "create error: $dbh->errstr";
$dbh->do("INSERT INTO aaa VALUES(1,'111-1111'), (2,'222-2222'), (3, '333-3333'), (4, NULL), (5, NULL);") or die "insert error: $dbh->errstr
 ";
$dbh->do("CREATE VIEW aaa_view1 AS SELECT * FROM aaa WHERE phone IS NOT NULL WITH CHECK OPTION;") or die "create view error: $dbh->errstr";
$dbh->do("CREATE VIEW aaa_view2 AS SELECT * FROM aaa ORDER BY id DESC;") or die "create view error: $dbh->errstr";

my $sth=$dbh->table_info('','','aaa%', 'VIEWaaaaaaaaaa')  or die $dbh->errstr ."  :table_info error\n";
my $table_counter=1;
my $true1=0;
my $true2=0;
while (my  @row=$sth->fetchrow_array()){
   my $catalog=$row[0];
   my $schema=$row[1];
   my $table=$row[2];
   my $type=$row[3];
   my $remarks=$row[4];
   printf("TableName: %d %s \t", $table_counter,$table );
   printf("TableType: %s \t", $type );
   printf("Schema: %s \t", $schema );
   printf("Catalog: %s \t", $catalog );
   printf("Remarks: %s \t", $remarks);
   print "\n\n\n";

   $table_counter++;

}

[perl@NC-PL-QA033 cases]$ perl table_info_2.pl pldb
TableName: 1 aaa_view1  TableType: VIEW         Schema:         Catalog:        Remarks:  


TableName: 2 aaa_view2  TableType: VIEW         Schema:         Catalog:        Remarks: