topic Re: how to get the owner and group of a file in SAS Enterprise Guide

how to get the owner and group of a file

alepage — Tue, 30 Mar 2021 13:59:16 GMT

Hello, I am using the following code to get the owner and group and it works well only if there is no space into the macro variable provided.

ex:

%macro find_owner(f);
* this will find the file owner;
filename fog pipe "ls -la &f. | awk '{print $3, $4}'";

data _null_ ;
infile fog truncover delimiter="|";
input xvalue :$256.;
call symput('owner',strip(substr(xvalue,1,index(xvalue," "))));
call symput('group',strip(substr(xvalue,index(xvalue," "),200)));
run;
%put &=owner &=group;
%mend find_owner;

The first call is working properly because there is no blank into the macro variable &f.

%find_owner(/finsys/lego816/saspgm/sasmacro/program1.sas);

But for the second one, there is a blank into the macro variable &f. between lego and 816. Is there a way to overcome this situation.

%find_owner(/finsys/lego 816/saspgm/sasmacro/program1.sas);

Also, when there is a space into the path or file name, I am not sure the macro macro variable will pick the complete path and program name.

Re: how to get the owner and group of a file

alepage — Tue, 30 Mar 2021 14:06:09 GMT

Forget about the question, I have found the solution which is to put the information provided in the call is single quote.

Re: how to get the owner and group of a file

Reeza — Tue, 30 Mar 2021 15:28:14 GMT

You can post the answer, corrected, and mark that as the solution. I'm certain someone else will ask this or google it at some point.

Re: how to get the owner and group of a file

alepage — Wed, 31 Mar 2021 18:08:53 GMT

For example:

%find_owner('/finsys/lego 816/saspgm/sasmacro/program1.sas');

Re: how to get the owner and group of a file

Kurt_Bremser — Thu, 01 Apr 2021 10:11:56 GMT

I think you are overcomplicating things:

data _null_;
infile "ls -l '&f.'" pipe;
input perms :$10. links owner :$8. group :$8.;
call symputx("owner",owner);
call symputx("group",group);
run;

%put &=owner &=group;