StringReplace LF character

[willichan]

I am baffled as to why I can't make such a simple thing work.

I have a CSV file that has CHR(10) linefeed characters in multi-line fields.  To ease handling of this file by an intermediate process, I am trying to replace the linefeed characters with the string "[[LF]]".  I have tried three different ways to replace the character, but none of them seems to do anything.

My test code looks like this:

#include <FileConstants.au3>

$file = FileOpen("test.csv", $FO_READ)
$data = FileRead($file)
FileClose($file)

StringReplace($data, @LF, "[[LF]]", 0)
StringReplace($data, Chr(10), "[[LF]]", 0)
StringReplace($data, ChrW(10), "[[LF]]", 0)

$file = FileOpen("test2.csv", $FO_OVERWRITE)
FileWrite($file, $data)
FileClose($file)

When I look at the test2.csv file, it still has the linefeed characters, and no "[[LF]]" strings.

Am I just brain dead here, or what is wrong?

Reproducer data file would look something like this (<CR> and <LF> represend the characters, not literal text):

"First","Last","Nickname","Photo"<CR><LF>
"John","Smith","Jonny<LF>
Mr. Smith","john_smith.jpg"<CR><LF>
"Michael","Small","Little Mike","michael_small.jpg"<CR><LF>
"Jonathan","Walker","Johnnie Walker<LF>
Town Drunk<LF>
I'll have another","jonathan_walker.jpg"<CR><LF>

 I am using the latest AutoIt v3.3.12.0.

[UEZ]

Can you please upload the example txt?

Br,

UEZ

[Gianni]

hi willichan

you forgot to catch the result of the StrngReplace() function

just put a new variable in front of the function or just the $data variable itself:

$data = StringReplace($data, @LF, "[[LF]]", 0)

[jchd]

willichan,

Chimp just pointed out why no replacement took place, but this is not the end of the day.

By replacing every @LF your CSV lines will now be terminated by @CR only followed by [[LF]] as the start of the next line, which is not what you want.

Instead you need to replace @LF which are not preceded by @CR and a regular expression is better suited for the task:

Local $csv =    '"First","Last","Nickname","Photo"' & @CRLF & _
                '"John","Smith","Jonny' & @LF & 'Mr. Smith","john_smith.jpg"' & @CRLF & _
                '"Michael","Small","Little Mike","michael_small.jpg"' & @CRLF & _
                '"Jonathan","Walker","Johnnie Walker' & @LF & 'Town Drunk' & @LF & 'I''ll have another","jonathan_walker.jpg"' & @CRLF

ConsoleWrite(StringRegExpReplace($csv, '(?<!\r)\n', '[[LF]]'))

[Belini]

@willichan try this:

$test = FileRead("test.csv")
$nText = StringRegExpReplace($test,'(?i)\@LF\b','[[LF]]')
MsgBox(4096,"Result",$nText)

or replace the file directly.

#include <File.au3>
$nText = _ReplaceStringInFile("test.csv", "@LF", "[[LF]]")

Edited June 8, 2014 by Belini

[jchd]

Belini,

That doesn't solve the issue I raised.

[Belini]

Belini,

That doesn't solve the issue I raised.

 

The first option does not work anymore substituting directly in the works

Test: https://www.dropbox.com/s/ckasvauah0i3apy/Test_Replace.rar

[jchd]

Now I see! You're joking, right?

BTW, next time please simply post code inline inside AutoIt codebox.

Edited June 8, 2014 by jchd

[Belini]

I kidding? I had already posted inside the codebox AutoIt in post number 5.

Test result using _ReplaceStringInFile, Not was replaced @CRLF.

 

'"First","Last","Nickname","Photo"' & @CRLF & _
'"John","Smith","Jonny' & [[LF]] & 'Mr. Smith","john_smith.jpg"' & @CRLF & _
'"Michael","Small","Little Mike","michael_small.jpg"' & @CRLF & _
'"Jonathan","Walker","Johnnie Walker' & [[LF]] & 'Town Drunk' & [[LF]] & 'I''ll have another","jonathan_walker.jpg"' & @CRLF

Edited June 9, 2014 by Belini

[jchd]

Once again realize that what you're doing is replacing the string @LF (those 3 characters litterally) in an AutoIt source code snippet mimicking the content of said CSV file.

This has nothing to do with the problem exposed by the OP, which is replacing lone linefeed characters (i.e. not preceeded by a carriage return character) by the string [[LF]] in actual CSV file.

[Belini]

So sorry, just tried to help.

[jchd]

Glad you see the light, no harm done.

I provided the help needed in >my previous post.

[willichan]

Thanks to all.

Chimp identified where my brain lag fell.

jchd, thanks for the regex code.  That did the trick nicely.