Re^2: Access and modify specific element of tab delimited .txt file

Thanks! This works well (after replacing " with '). It is slightly more complex in that $F[0] will not always eq 'A', so this could also be used:

perl -plae '$.== 1 and $_ = 'ID' . $_'

Comment on Re^2: Access and modify specific element of tab delimited .txt file Download Code

Replies are listed 'Best First'.
Re^3: Access and modify specific element of tab delimited .txt file by BrowserUk (Patriarch) on Mar 30, 2016 at 12:32 UTC
Is there a way for it to simply check for any string (non-delimiter character) at all? Eily called it right: `C:\test>type junk.dat A B C D E A 1 1 1 1 1 B 1 1 1 1 1 C 1 1 1 1 1 D 1 1 1 1 1 E 1 1 1 1 1 C:\test>perl -F\t -plae"$.== 1 and $F[0] eq '' and $_ = 'ID' . $_" jun +k.dat ID A B C D E A 1 1 1 1 1 B 1 1 1 1 1 C 1 1 1 1 1 D 1 1 1 1 1 E 1 1 1 1 1` [download] With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". I knew I was on the right track :) In the absence of evidence, opinion is indistinguishable from prejudice.	[reply] [d/l]

Replies are listed 'Best First'.

Re^3: Access and modify specific element of tab delimited .txt file
by BrowserUk (Patriarch) on Mar 30, 2016 at 12:32 UTC

Is there a way for it to simply check for any string (non-delimiter character) at all?

Eily called it right:

C:\test>type junk.dat
        A       B       C       D       E
A       1       1       1       1       1
B       1       1       1       1       1
C       1       1       1       1       1
D       1       1       1       1       1
E       1       1       1       1       1

C:\test>perl -F\t -plae"$.== 1 and $F[0] eq '' and $_ = 'ID' . $_" jun
+k.dat
ID      A       B       C       D       E
A       1       1       1       1       1
B       1       1       1       1       1
C       1       1       1       1       1
D       1       1       1       1       1
E       1       1       1       1       1
[download]

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.

"Science is about questioning the status quo. Questioning authority". I knew I was on the right track :)

In the absence of evidence, opinion is indistinguishable from prejudice.

[reply]
[d/l]