void
get_line ()
       PPCODE:

       EXTEND(SP, 1) ;
       PUSHs (sv_2mortal(newSVpv(pd.line,0))) ;
       free (pd.line) ;
       pd.line = 0 ;