@tt = (1,2,3,5,0,7,8,9,10);
map{if($_!=0){print "I did something when it is not zero\n";}}@tt;