use strict; use warnings; #### $ING{$t[9]}=$t[1];