@result= grep($_ gt '0003', <DATA>);