Ard chapter15

Added chapter 15 solutions
I call it Smart Perl.