my @ary = split (" ",<DATA>);