Shell Programming and Scripting

Code:

time=`date '+%m/%d/%y %H:%M:%S`
nawk -v t="$time" '{
if ($1 ~ /\$Header:/ )
printf("%s %s %f %s pkm ship$\n",$1,$2,$3+0.1,t)
else
print
}' filename

summer_cherry,

The OP also wants replace the filename and version and also to keeps the exact length of a record.

Regards.

Also note that the $Header keyword is not necessarily at start of line, or the first field.

I was under the impression that the file name should stay.

Hi Era,

Assume that I have a file VT100.fmm with content:

$Header: FNDSCMON.fmb 115.6 2000/01/11 10:26:10........................pkm ship$
Other Word $Header: FNDSCMON.fmb 115.6 2000/01/11 10:26:10........................pkm ship$
$Header: FNDSCMON.fmb 115.6 2000/01/11 10:26:10........................pkm ship$


and I convert it with:

perl -pe 's!(\$Header: \S+ )(\d+\.\d+) (\d{4}/\d{2}/\d{2} \d{2}:\d{2}:\d{2})( +pkm ship\$)\n!
my ($head, $ver, $date, $tail) = ($1, $2, $3, $4);
my @now = gmtime();
sprintf "%s %3.1f %04i/%02i/%02i %02i:%02i:%02i%s\n",
$head, $ver+0.1, $now[5]+1900, $now[4]+1, $now[3], $now[2], $now[1], $now[0], $tail !e' VT100.fmm


and I view the file using vi, but the lines were not changed, can you please help?

Thanks!
Victor Cheung

If the $Header keyword is not at the start of line:

Code:

 #!/bin/sh

curr_dat=`date "+%Y\/%m\/%d"`
curr_time=`date "+%H:%M:%S"`

awk -v dat=$curr_dat -v t=$curr_time -v name="old_version" -v ver="0.1" '
/\$Header:/{
$2=sprintf("%-12s",name)
$3=sprintf("%-5s",ver)
$4=sprintf("%-10s",dat)
$5=sprintf("%-31s",t)
}1
' file

Regards

If it's not even $1, the field numbers are wrong, too. Up in comment #5 victorcheung writes:

Anyway, awk is not necessarily very robust when it comes to handling binary files, whereas Perl supposedly is.

Hi Era,

Thank you very much, it works!!


Hi Frank and Summer,

Thank you for your help!! But the perl works for binary file.


Thanks again!!
Victor Cheung