A SAS MACRO TO DO STRING SEARCH IN A FOLDER

shiyiming · 发表于 2010-10-22 13:24:02

From Wensui Liu's blog

data driver; infile datalines truncover; input string $ 1 - 100; datalines; woe fmt ; run; %macro grep(path = , ext = , driver = , str = ); *************************************************; * THIS MACRO IS TO DO A STRING SEARCH FUNCTION *; * SIMILAR TO GREP IN UNIX *; * --------------------------------------------- *; * PARAMETERS: *; * path : the path to be searched *; * ext : file extension to be searched *; * driver: the driver table containing strings *; * to search for *; * str : field name containing strings in the *; * driver table *; * --------------------------------------------- *; * OUTPUT: 1 txt file per string searched *; * --------------------------------------------- *; * LIMITATION: only works for UNIX *; *************************************************; data _null_; set &driver; i + 1; index = put(i, z3.); cmd = "find %trim(&path) -name '"||"%trim(&ext)"||"' | xargs grep -i '" ||strip(&str)||"' > "||index||'_' ||translate(strip(&str), '_', ' ')||".txt"; put cmd; call system(cmd); run; %mend grep; %grep(path = /yourpath/, ext = *.log, driver = driver, str = string);

		自动登录	找回密码
密码			立即注册