Here's a little portability quiz for you. Why doesn't this work?
... unless $^O =~ /win/i;
For bonus points, what do you think I was trying to do (just with the conditional)?
For super bonus points, which module do you think I look in when I use $^O?
Remember, I'm making mistakes so you don't have to!
Okay, enough Perl for today. It's time for pre-Labor Day parties.