Search Results

I think you have already gotten very good advice about how to solve it but it might be helping you to understand what is going on:

When a process "opens" a file it calls some OS function (namely...

WHAT is the garbage? What is correct after that?
If I get you correctly, the truncation works correctly, and the old log file contents is lost.
Does the process keep the old file open? Check with...

Oh, now I see. Sorry, I was confused by your phrase "redirecting to null" You have tried to truncate the file separately. The problem you might have is that the file is still open by your running...

Yes, misread something... in that case:
awk 'NF=NF+1' OFS="|" file

With awk:
awk '$1=$1' OFS="|" file

It would be better if you could post some complete lines. But no matter.

create index has one space.
create unique index has two spaces.

Your regular expression specifies at least two spaces...

$ cat temp.sh
length=15
value="1234567890"
printf "%0*d\n" $length "$value"

$ ./temp.sh
000001234567890

For zero padding in ksh, use the typeset command:

$ typeset -RZ5 x
$ x=25
$ echo $x
00025

Mapping it to your case:
$ length=15
$ value="1234567890"
$ typeset -RZ${length} value
$ echo...

You can do it like this:

printf "%15s\n" "$value"


For dynamic:
printf "%*s\n" $length "$value"

Guru.

With sed:
sed 's/^\(.\{149\}\)./\1X/' inputfile

1s/\(^.\{17\}\).\{8\}\(.*\)/\1some123text\2/ --> '1s' refers to substitution only in the first line. First 17 characters (matched by pattern in green) are stored in buffer, referenced by \1. The next...

sed '1s/\(^.\{17\}\).\{8\}\(.*\)/\1some123text\2/; /^5900/s/\(^.\{4\}\).\{13\}\(.*\)/\1some123text\2/' inputfile

The Perl way.
$ echo "123" | perl -e 'chomp($x=<>);$pad_chr="0";$len=3; print $x . ($pad_chr x $len)'
123000

Sans redundance.
$ echo "123" | perl -e 'chomp($_=<>);print $_ .("0"x3)'
123000

Traditional way!

echo 12121 | awk '{printf $0;while(len-->0){printf char}}' len=5 char=9


HTH
--ahamed

One possible way:

$ cat infile
030150678 bos 00156 0500405612 23 23
$ sed 's/^\(.\{3\}\)\(.\{5\}\)\(.\)\(.\{9\}\)\(.\{7\}\)\(.\{2\}\).*/\1|\2|\3|\4|\5|\6/' infile
030|15067|8| ...

Hi greenworld123,

Try next 'perl' program:

$ cat script.pl
use warnings;
use strict;

while ( <DATA> ) {
chomp;
printf qq[%s\n], join ( qq[|], unpack( qq[A3 A5 A1 A9 A7...

put variables $x in quotes
if [ "$x" == "A" ]; then
t=$[t+1];
a=$y;
elif [ "$x" == "B" ]; then
t=$[t+3];
b=$y;
elif [ "$x" == "C" ]; then
here is my...