DATA mice1;
INPUT control @@;  
/* The @@ symbol tells SAS there are multiple observations on each line*/
CARDS;
1.321 1.423 2.682 0.934 1.230 1.670 3.201
;
run;

DATA mice2;
SET mice1;
INPUT treatment @@; 
diffs = control - treatment; 
/* The @@ symbol tells SAS there are multiple observations on each line*/
CARDS;
0.841 0.932 2.011 0.762 0.991 1.120 2.312
;
run;

/* p-value for the two-sided t-test of H_0: mu_D=0: */
PROC MEANS DATA = mice2 t prt clm alpha=0.05;
VAR diffs;
run;
/* To get the "greater-than" P-value, in this case */
/* we divide the two-sided P-value by 2.           */