Yes, you're right! (When I skimmed the code, the final closes jumped out at me as looking off, I'm obviously not used to this style.)

Sorry, PandaRaey, this is Perl and There Is More Than One Way To Do It, you're free to use whatever indentation style you like, as long as it's consistent (which it is in this case). If I may make a minor comment though: some more whitespace in statements like foreach$folder(@folders) would make them a little easier to read, IMHO.