scp by SAS

options nocenter missing = ' ' mprint mlogic symbolgen;


/**************************************/
/* Execute scp over macro values      */
/**************************************/
%macro scp;

 %do i = 2 %to 3;

  filename scp clear;
  filename scp pipe "scp &&s_&i..:/etc/passwd ~/scp_test/&&s_&i.._passwd" ;

  data _null_;
   infile scp;
  run;

 %end;

%mend;

%scp;