@a = qw(Object boolean byte char short
 int float long double String); 

for (@a) {
    
}