Perl scripts I have used to impress my (now) wife...

• Discussion Section / Office Hours Poll Taker and Discussion Section / Office Hours Preferences Analizer
• Student Class Section Lottery
• Random Background from Net
• Make N pointed stars
• Re: Perl Spots (which also impresses me because it was node #190000)
• This code for harvesting data about medical residency programs and building KML based maps like this one for Pediatrics

She was also really impressed when I became a PM "Saint" -- she kept asking me "What (reputation) are you up to now on perlmonks?" every few hours for over a month leading up to it. (I never had the heart to tell her that all of the levels were redone and now i'm just a Parson)