Shell Programming and Scripting

Sorry, I have not worked on Perl scripting.. it's new to me... I feel GNU bc method will be ok for me.. if you guide me the installation way, i can probably try with that method.....

And also I have just found that my machine is 64 bit..

$ getconf KERNEL_BITS
64

now is there anyway to get my result?

Depends on if the programs are compiled in 64-bit. Try

Code:

file `which bc` `which awk` `which perl`

Is it a 64-bit or 32-bit executable? (You might have to find the paths manually).

For installing bc, you'll have to go to the home page, whose link I provided, and follow the steps. You'll probably need the sysadmin's help, but in theory, you can do something like:

Code:

gunzip -c gbc-*tgz | tar xf - 
cd gbc????
./configure --prefix=$HOME
make install

I got the below result...

$ file `which bc` `which awk` `which perl`
/usr/bin/bc: PA-RISC1.1 shared executable dynamically linked
/usr/bin/awk: PA-RISC1.1 shared executable dynamically linked
/usr/bin/perl: PA-RISC1.1 shared executable dynamically linked -not stripped
$


Meantime, I just waiting for my Unix admin's response to install GNU bc. If i install GNU bc, current version bc will be affected. I mean GNU bc having all the features ?

Yeah, so these are the 32-bit versions. Programs that report RISC2.0 are the 64-bit versions. (See 8.33 What are the various revisions of PA-RISC?). So even though the hardware can support 64-bit integers, the programs cannot. Even installing the 64-bit version of these programs would solve your problem.

So have him install it in /usr/local/bin or in /usr/local/gnu or in your home directory ($HOME/bin) and make sure your PATH prefixes these, or use the full path, or have the program installed as "gbc".

Hi,
Thanks. I have installed GNU bc version in development which is working fine as well..

$ awk '{ print "last + " $0 }' hash_column_wrong.txt | /usr/local/bin/bc | tai
l -1
2156379608
$

But I am trying to match this code with my existing awk script.

My existing awk script ..

BEGIN {
totalLatestRetailPrice = 0;
}
#
{
if (substr($0,1,7)=="HCDWC01")
{
printf "%s%58s\n", substr($0,1,28), " "
}
else
if (substr($0,1,7)=="TCDWC01")
{
printf "%s%015d%44s\n", substr($0,1,27), totalLatestRetailPrice,
" "
}
else
{
totalLatestRetailPrice += int(substr($0,14,7))
print
}
}

I am calliing above awk script like this....

awk -f header_trailer/creation/hash_total.awk input_file > output_file

here input_file is the parameter here.. we are taking the digits from 14 - 20 ( 7 digits )
1335310 000001030000036000000092H99W710172S300

( Before, I mentioend hash_column_wong.txt file which is created from above input_file for my testing ). .. In the "else" part , logic is there to find out the total value..

else
{
totalLatestRetailPrice += int(substr($0,14,7))
print
}


We need to replace the above line ( totalLatestRetailPrice += int(substr($0,14,7)) with
our new bc caluclator line ( awk '{ print "last + " $0 }' hash_column_wrong.txt | /usr/local/bin/bc | tail -1 ).. here we don't need to pass the has_column_wrong.txt file since we are already passing input_file..

Um, too bad you didn't mention that before. The traditional awk doesn't have a facility for piping in data from a program called within awk. It's available in gawk. But if you're going to download and install something, and your hardware is guaranteed to be 64 bits, just download, compile and install gawk and use your original script!

Or re-write the script using sh/ksh/bash. If you have bash or ksh, let me know and I can help you write that script. If not, it can be done but will be more computationally expensive.