03-23-2004
You could use the tr command :-
tr '\012' '\174' < filein | tr '\015' '\012' | unix2dos > fileout
Explanation of above code:-
- use tr on the file to convert all 0A to 7C
- pipe result into tr to convert all 0D to 0A
- pipe result into unix2dos to expand all 0A to 0A0D
Notes:-
- Input lines can be of any length.
- Transfer files in binary mode to prevent automatic conversion.
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
Apologies if this has been asked before, but I searched and was not able to find an answer. It's probably a simple question to answer for those of you with some experience, though...
I have a relatively long string where tokens are separated by the colon (':') character. Let's say the... (10 Replies)
Discussion started by: johnemb
10 Replies
2. Shell Programming and Scripting
i have a text file which domains something like this
123213213213/32434342
324324324/12312321321
12321321,435435435
12321312 / 12313213 / 12435435345
4353213 , 123213213213
21321321312-12334324
234324324 - 235645645645
456456456 - 45456456456 - 45645645654243
how can i replace '/' and... (4 Replies)
Discussion started by: Bashar
4 Replies
3. Shell Programming and Scripting
Hello All,
I have a requirement where I need to replaced the hex character - '\x0D' with 2 hex characters - 'x0D' & 'x0A'
I am trying to use SED -
But somehow its not working. Any pointers?
Also the hex character '\x0D' can occur anywhere in the line.
Can this also be accomplished... (6 Replies)
Discussion started by: paragkalra
6 Replies
4. Shell Programming and Scripting
ok, so i have the following text to replace but it's not working. can someone please help me out:
:%s~awk '// {split($2,s,",");a=$1 FS s} /-/ {b=a} END{print b}'~tail -1~g
I want to replace the entire awk command with tail -1.
thanks (7 Replies)
Discussion started by: SkySmart
7 Replies
5. UNIX for Dummies Questions & Answers
I have the following file consisting of dates and sample measurements:
05��Oct��2010 1.31��
06��Oct��2010 1.32��
07��Oct��2010 1.31��
The hex characters are \xc2\xa0 in sequence.
I have tried to remove the characters as follows:
sed -i '' -e 's/\xc2\xa0//g' file.dat
and as follows... (6 Replies)
Discussion started by: figaro
6 Replies
6. Shell Programming and Scripting
I have file like this
"copy table_name from filea.txt on node replace delimiter '|';"
"copy table_name from fileb.txt on node replace delimiter '|';"
"copy table_name from filec.txt on node replace delimiter'|';"
"copy table_name from filee.txt on node replace delimiter '|';"
"copy... (1 Reply)
Discussion started by: nnani
1 Replies
7. Shell Programming and Scripting
Hi
I need to write a Perl script that the file given as first argument of the command line that will find all occurrences of the string given as the third argument of the command line and replace with the string given as the fourth argument. Name newfound file is specified as the second... (3 Replies)
Discussion started by: nekoj
3 Replies
8. Shell Programming and Scripting
Hello,
I'm looking for some help in renaming data-timestamps stored within different calendar directories/files.
The calendar directory has hundreds of ICS files:
~/Library/Calendars/F494C908.calendar/Events/92B65E439AAC.ics
~/Library/Calendars/F494C908.calendar/Events/DE7867E61969.ics... (8 Replies)
Discussion started by: Schubi
8 Replies
9. HP-UX
Hi guys,
First off, i'm a complete noob to UNIX and LINUX so apologies if I don't understand the basics!
I have a file which contains a hex value of '0D' at the end of each line when I look at it in a hex viewer.
I need to change it so it contains a hex value of '0D0A0A'
I thought... (10 Replies)
Discussion started by: AndyBSG
10 Replies
10. Shell Programming and Scripting
Hello,
I'm looking to check only the first line of a file to see if it is a format string, like
# -*- coding: utf-8; mode: tcl; tab-width: 2; indent-tabs-mode: nil; c-basic-offset: 2 -\*- vim:fenc=utf-8:ft=tcl:et:sw=2:ts=2:sts=2if the first line is anything else, insert the above string.
I'd... (3 Replies)
Discussion started by: f77hack
3 Replies
LEARN ABOUT MOJAVE
text::diff::table5.18
Text::Diff::Table(3) User Contributed Perl Documentation Text::Diff::Table(3)
NAME
Text::Diff::Table - Text::Diff plugin to generate "table" format output
SYNOPSIS
use Text::Diff;
diff @a, $b { STYLE => "Table" };
DESCRIPTION
This is a plugin output formatter for Text::Diff that generates "table" style diffs:
+--+----------------------------------+--+------------------------------+
| |../Test-Differences-0.2/MANIFEST | |../Test-Differences/MANIFEST |
| |Thu Dec 13 15:38:49 2001 | |Sat Dec 15 02:09:44 2001 |
+--+----------------------------------+--+------------------------------+
| | * 1|Changes *
| 1|Differences.pm | 2|Differences.pm |
| 2|MANIFEST | 3|MANIFEST |
| | * 4|MANIFEST.SKIP *
| 3|Makefile.PL | 5|Makefile.PL |
| | * 6|t/00escape.t *
| 4|t/00flatten.t | 7|t/00flatten.t |
| 5|t/01text_vs_data.t | 8|t/01text_vs_data.t |
| 6|t/10test.t | 9|t/10test.t |
+--+----------------------------------+--+------------------------------+
This format also goes to some pains to highlight "invisible" characters on differing elements by selectively escaping whitespace. Each
element is split in to three segments (leading whitespace, body, trailing whitespace). If whitespace differs in a segement, that segment
is whitespace escaped.
Here is an example of the selective whitespace.
+--+--------------------------+--------------------------+
| |demo_ws_A.txt |demo_ws_B.txt |
| |Fri Dec 21 08:36:32 2001 |Fri Dec 21 08:36:50 2001 |
+--+--------------------------+--------------------------+
| 1|identical |identical |
* 2| spaced in | also spaced in *
* 3|embedded space |embedded tab *
| 4|identical |identical |
* 5| spaced in | tabbed in *
* 6|trailing spacesss
|trailing tabs
*
| 7|identical |identical |
* 8|lf line
|crlf line
*
* 9|embedded ws |embedded ws *
+--+--------------------------+--------------------------+
Here's why the lines do or do not have whitespace escaped:
lines 1, 4, 7 don't differ, no need.
lines 2, 3 differ in non-whitespace, no need.
lines 5, 6, 8, 9 all have subtle ws changes.
Whether or not line 3 should have that tab character escaped is a judgement call; so far I'm choosing not to.
UNICODE
To output the raw unicode chracters consult the documentation of Text::Diff::Config. You can set the "DIFF_OUTPUT_UNICODE" environment
variable to 1 to output it from the command line. For more information, consult this bug:
<https://rt.cpan.org/Ticket/Display.html?id=54214> .
LIMITATIONS
Table formatting requires buffering the entire diff in memory in order to calculate column widths. This format should only be used for
smaller diffs.
Assumes tab stops every 8 characters, as $DIETY intended.
Assumes all character codes >= 127 need to be escaped as hex codes, ie that the user's terminal is ASCII, and not even "high bit ASCII",
capable. This can be made an option when the need arises.
Assumes that control codes (character codes 0..31) that don't have slash-letter escapes ("
", "
", etc) in Perl are best presented as hex
escapes ("x01") instead of octal ("