... $in =~ s/\\\n[\t ]*//g; ...