Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: Add delimiter to a file from layout file
Top Forums Shell Programming and Scripting Add delimiter to a file from layout file Post 302973213 by lalitpct on Monday 16th of May 2016 04:38:50 AM
Old 05-16-2016
Quote:
Originally Posted by RudiC
Try this pure shell (bash):
Code:
while IFS="       (:)" read _ _ P _ _ L; do ((IX++)); POS[$IX]=$((P-1)); LEN[$IX]=$L; done < layout.txt

while read T
  do    unset CRS L
        for i in ${!POS[@]}
          do    L=$L${T:$CRS:$((${POS[$i]}-CRS))}"~"${T:${POS[$i]}:${LEN[$i]}}"~"
                CRS=$((${POS[$i]}+${LEN[$i]}))
          done
        L=${L#\~}
        L=${L//~~/\~}
        L=$L${T:$CRS}
        printf "%s\n" $L
  done < abc.txt
11~01~0116~03~15100000000000000
11~01~0116~03~15100000000000000

Thanks this looks perfect ,
when I run it in ksh it gives error for IX, I defined IX=0 but still doesn't work
Code:
IX++: bad number

any idea why ?
Last edited by RudiC; 05-16-2016 at 05:53 AM.. Reason: Added [i]code tags.
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

splitting file with more than one delimiter

Hi, I just wandering how to split a record which has more than one delimiter, i have a file which contains pattern as group separtor and ~ as field separtor, Ultimately I need consider even the groups as a field, So i need to make this multi-delimited file into ~ delimited file. My record... (4 Replies)
Discussion started by: braindrain
4 Replies

2. Shell Programming and Scripting

extracting delimiter from a file.

hi, pls someone tell me how to extract delimiters from any file and pass it to a unix script.since, im a beginner in unix i find it little bit difficult.how to use awk to do this? (9 Replies)
Discussion started by: sureshmit
9 Replies

3. UNIX for Dummies Questions & Answers

How to change delimiter in my file ?

Hi I have a file in which delimiter is ';' However if the delimiter is within "" it is a part of the string and not delimiter. How to get the fields ? I want to replace the delimiter ';' to '|'. The file contains data like this : 11111; “2222 2222”; “3333; 3333”; “4444 ""44444” The file... (2 Replies)
Discussion started by: dashing201
2 Replies

4. Shell Programming and Scripting

Creating delimiter file

#/bin/sh sysdate=`date +"%m/%d/%Y"` systime=`date +%r` ps_per=`lsps -s | nawk '{print $2+0}'|tail -1` ps_tot=`lsps -s | nawk '{print $1+0}'|tail -1` lcpu=`vmstat | nawk -F= '/lcpu/ {print $2+0}'` mem_tot=`vmstat | nawk -F= '/mem=/ {print $3+0}'` avm=`vmstat|awk '{print... (7 Replies)
Discussion started by: Daniel Gate
7 Replies

5. Shell Programming and Scripting

Delimiter in output file

Hello, I am trying to find the record count in a specific folder, Here is the part of the code =========================== STARTDATE=`date +"%y%m%d%H%M"` for i in `ls *.DAT` do wc -l $i >> /XYZ/SrcFiles/"Record_counts"$STARTDATE.csv ... (2 Replies)
Discussion started by: Shanks
2 Replies

6. UNIX for Advanced & Expert Users

File Delimiter

Hi All, I woul like to know with out opening a file in unix ,how we can find out what is the delemeter in that file... Thanks.. edit by bakunin: changed thread title to "delimiter" so it can be found. (4 Replies)
Discussion started by: raju4u
4 Replies

7. Shell Programming and Scripting

Help with changing text file layout

Hi there, I am with this one column input text file to change layout, please help. Thanks. I have awk, sed. $ cat input Median 1.0 2.3 3.0 Median 35.0 26.3 45.7 10.1 63.1 Median 1.2 2.3 (8 Replies)
Discussion started by: cwzkevin
8 Replies

8. Shell Programming and Scripting

Shell script to put delimiter for a no delimiter variable length text file

Hi, I have a No Delimiter variable length text file with following schema - Column Name Data length Firstname 5 Lastname 5 age 3 phoneno1 10 phoneno2 10 phoneno3 10 sample data - ... (16 Replies)
Discussion started by: Gaurav Martha
16 Replies

9. UNIX for Dummies Questions & Answers

Getting the folder name and file name after delimiter

Hi, I have a input /dev/cm/test1.txt /qa/tm/hmkr/cc/test2.txt and I need an out like below foldername, filename /dev/cm/,test1.txt /qa/tm/hmkr/cc/,test2.txt I tried with awk $NF, but I'm getting the filenames and not folder names. Please let me know how to achive the above... (5 Replies)
Discussion started by: somu_june
5 Replies

10. Shell Programming and Scripting

Perl Code to change file delimiter (passed as argument) to bar delimiter

Hi, Extremely new to Perl scripting, but need a quick fix without using TEXT::CSV I need to read in a file, pass any delimiter as an argument, and convert it to bar delimited on the output. In addition, enclose fields within double quotes in case of any embedded delimiters. Any help would... (2 Replies)
Discussion started by: JPB1977
2 Replies

LEARN ABOUT DEBIAN

bit::vector::minimal

Bit::Vector::Minimal(3pm)				User Contributed Perl Documentation				 Bit::Vector::Minimal(3pm)

NAME

       Bit::Vector::Minimal - Object-oriented wrapper around vec()

SYNOPSIS

	 use Bit::Vector::Minimal;
	 my $vec = Bit::Vector->new(size => 8, width => 1, endianness => "little");
	 # These are the defaults

	 $vec->set(1); # $vec's internal vector now looks like "00000010"
	 $vec->get(3); # 0

DESCRIPTION

       This is a much simplified, lightweight version of Bit::Vector, and wraps Perl's (sometimes confusing) "vec" function in an object-oriented
       abstraction.

METHODS

   new
       Creates a new bit vector. By default, this creates a one-byte vector with 8 one-bit "slots", with bit zero on the right of the bit pattern.
       These settings can be changed by passing parameters to the constructor: "size" will alter the size in bits of the vector; "width" will
       alter the width of the slots. The module will die if "width" is not an integer divisor of "size". "endianness" controls whether the zeroth
       place is on the right or the left of the bit vector.

   set(POS[, VALUE])
       Sets the bit or slot at position "POS" to value "VALUE" or "all bits on" if "VALUE" is not given.

   get(POS)
       Returns the bit or slot at position "POS".

   display
       Display the vector. For debugging purposes.

AUTHOR

       Current maintainer: Tony Bowden

       Original author: Simon Cozens

BUGS and QUERIES
       Please direct all correspondence regarding this module to:
	 bug-Bit-Vector-Minimal@rt.cpan.org

SEE ALSO

       Bit::Vector

COPYRIGHT AND LICENSE

       Copyright 2003, 2004 by Kasei

       This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

perl v5.12.3							    2005-10-04						 Bit::Vector::Minimal(3pm)
All times are GMT -4. The time now is 02:14 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy