grep.m

来自「实现matlab很多功能的源代码」· M 代码 · 共 14 行

function grep(filename, pattern)

fid = fopen(filename, 'r');
line_number = 0;
while feof(fid) == 0,
	line = fgetl(fid);
	matched = findstr(line, pattern);
	if ~isempty (matched)
		fprintf('%d: %s \n', line_number,line);
	end
	line_number = line_number + 1;
end
fclose(fid);