boundare edges scripts

 From:  Andrei Samardac
5922.1 
Hallo Michael, could you pleas make some scripts:
1. Select boundary edges on selected surface and if possible on selected joined surface
2. First script + delet selected edges.