W: script for selecting perimeter of selected face

 From:  Yenmonger (OTTERMAN)
3867.1 
Heya guys, I poked around for a bit and couldn't find other instances of this functionality.

What I would like to do is select a face of a solid, then select the lines that make its perimeter, like so: