How to merge lines with \ (backslash) at the end?
I mean,
line1
line2\
line3
should become
line1
line2line3
Zaranee bolshoe spasibo
>How to merge lines with \
>(backslash) at the end?Из Perl Cookbook:
while(defined($line = <FH>))
{
chomp $line;
if($line =~ s/\\\s*$//)
{
$line .= <FH>;
redo unless eof(FH);
}
# Обработать полную запись в $line
}