grep {substr($_,0,1) ne 'f'} @array