All the Perl that's Practical to Extract and Report
Well, 5 minutes after ranting about not getting the orientation working, I fixed it... 2 minutes after I got the orientation working, I also got the cutting working...Damn, I'm good!