Actually the normalisation substitution ($line =~s/\\/\//g;) should be first so that either form of path separator can be used for input and successfully matched later on against a normalised match string using / instead of \.