13:20 >perl 1032a_SoPW.pl subs.txt
line found to be xa1 b t g e1

subcircuit found is e1 in xa1 b t g e1
inside sub for e1
.subckt e1 x y z
  xa a b c1
  xb c d k1
  xc f g h1
.ends
line found to be xa1 a s f a1

subcircuit found is a1 in xa1 a s f a1
inside sub for a1
.subckt a1 x y z
   xa a b c1
   xb c d e1
   xc f g h1
 .ends

13:20 >