R help - Jul 2007 - p-value from survreg, library(survival)

dear r experts:
I would appreciate advice on how to get the p-value from the object 'sr'
created  with the function survreg() as given below.
vlad

sr<-survreg(s~groups, dist="gaussian")
Coefficients:
(Intercept)      groups
-0.02138485  0.03868351

Scale= 0.01789372

Loglik(model)= 31.1   Loglik(intercept only)= 25.4
        Chisq= 11.39 on 1 degrees of freedom, p= 0.00074
n= 16

	[[alternative HTML version deleted]]