02-13-2008
Hi ,I am using HP-UX B.11.11 ( HP unix ). If i get the freeware for HP unix, I can install the GNU bc with help of Unix admin. Please provide the link for GNU bc of HP unix.
I can't spilit the file as it's a source file which comes from source sytem. I should not touch that.. and I am pasting here my awk program to add the number.. Please look at the last "else " part which shows the addition ... in this existing code only, I need to amend the changes to get the total count with full digit rather the expontial formt..
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
}
}
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi all,
Something funny happen with this code:
EXIST=`ssh batch@190.2.332.234 'if ; then echo 0; else echo 1 ; fi'`
echo $EXIST
Above code will display "1".
The value of remotePath is /home/batch
The value of fileName is sample.txt
=========================================
... (1 Reply)
Discussion started by: suigion
1 Replies
2. UNIX for Dummies Questions & Answers
In LINUX(CentOS, RedHat) is there a way to have the banner statement appear before the logon instead of after the logon? In UNIX and Windows the banner appears before a person actually logs on, what I'm seeing in LINUX is that it appears after the login(ftp, telnet, SSH).
Thanks (0 Replies)
Discussion started by: ejjones
0 Replies
3. Shell Programming and Scripting
Hi All,
I am trying to sort the below data using sort command.
temp.dat
H|S1-511091486889|27-Jul-2011 00:00:00
H|S1-511091486823|27-Jul-2011 00:00:00
H|S1-511091486757|27-Jul-2011 00:00:00
L|S1-511091486889|1
L|S1-511091486823|1
L|S1-511091486757|1
sort -t "|" -k2 -k1 temp.dat
My... (5 Replies)
Discussion started by: deepaknbk
5 Replies
4. Shell Programming and Scripting
Hello everyone, I'm in need of some assistance. I'm currently enrolled in an introductory UNIX shell programming course and, well halfway through the semester, we are receiving our first actual assignment. I've somewhat realized now that I've fallen behind, and I'm working to get caught up, but for... (1 Reply)
Discussion started by: MrMagoo22
1 Replies
5. Windows & DOS: Issues & Discussions
Hi,
I'm having a nightmare of a time with this one. I've recently taken over a sys admin role and shortly after I did, the print server failed. I've had to replace the hard disk. ---don't ask about backups....there hasn't been a sys admin in post for almost a year......
Anyway, the aim, to... (0 Replies)
Discussion started by: rudigarude
0 Replies
6. Shell Programming and Scripting
Hi,
There is a user in Solaris-10 zone, ora_big01. Its .profile is not getting executed due to some reason and I am not able to find that.
root@trddpd-dwsq04:/# cat /etc/passwd | grep -i ora_big01
ora_big01:x:242349:220:Siebel for QA:/ccq/apps/siebel:/usr/bin/ksh
root@trddpd-dwsq04:/# which ksh... (3 Replies)
Discussion started by: solaris_1977
3 Replies
7. Shell Programming and Scripting
Hi All,
I am using the below script which has awk command, but it is not returing the expected result. can some pls help me to correct the command.
The below script sample.ksh should give the result if the value of last 4 digits in the variable NM matches with the variable value DAT. The... (7 Replies)
Discussion started by: G.K.K
7 Replies
8. UNIX for Advanced & Expert Users
Hi,
Not entirely sure if this is the right thread.
Essentially, fdisk -l shows that /dev/sda is a drive (750 GB), with 1 partition at /dev/sda1 with system type "Linux".
I'm pretty nooby at working with drives, but I'm pretty sure that the output of:
mount /dev/sda1 /media/int
Should not... (4 Replies)
Discussion started by: FreddoT
4 Replies
9. Shell Programming and Scripting
Hi
I am trying to do a "IF" Condition in UNIX where we compare EACH file size in a directory with a SIZE (Parameter passed)
If Each File size EXCEEDS parameter passed SIZE then we manipulate the file.
Somehow the IF condition do not work ?? (is this Variable decalration issue ??)
... (9 Replies)
Discussion started by: Pete.kriya
9 Replies
10. Shell Programming and Scripting
Hi all,
I have tried to send an email with the below script. but i am not getting the subject of the email where it is present in the simply.txt.
I am using HP UNIX server.
I am not sure what mistake i made in the below unix command. any help would be appreciated.
cat simply.txt ... (2 Replies)
Discussion started by: arun888
2 Replies
bytes(3pm) Perl Programmers Reference Guide bytes(3pm)
NAME
bytes - Perl pragma to force byte semantics rather than character semantics
NOTICE
This pragma reflects early attempts to incorporate Unicode into perl and has since been superseded. It breaks encapsulation (i.e. it
exposes the innards of how the perl executable currently happens to store a string), and use of this module for anything other than
debugging purposes is strongly discouraged. If you feel that the functions here within might be useful for your application, this possibly
indicates a mismatch between your mental model of Perl Unicode and the current reality. In that case, you may wish to read some of the perl
Unicode documentation: perluniintro, perlunitut, perlunifaq and perlunicode.
SYNOPSIS
use bytes;
... chr(...); # or bytes::chr
... index(...); # or bytes::index
... length(...); # or bytes::length
... ord(...); # or bytes::ord
... rindex(...); # or bytes::rindex
... substr(...); # or bytes::substr
no bytes;
DESCRIPTION
The "use bytes" pragma disables character semantics for the rest of the lexical scope in which it appears. "no bytes" can be used to
reverse the effect of "use bytes" within the current lexical scope.
Perl normally assumes character semantics in the presence of character data (i.e. data that has come from a source that has been marked as
being of a particular character encoding). When "use bytes" is in effect, the encoding is temporarily ignored, and each string is treated
as a series of bytes.
As an example, when Perl sees "$x = chr(400)", it encodes the character in UTF-8 and stores it in $x. Then it is marked as character data,
so, for instance, "length $x" returns 1. However, in the scope of the "bytes" pragma, $x is treated as a series of bytes - the bytes that
make up the UTF8 encoding - and "length $x" returns 2:
$x = chr(400);
print "Length is ", length $x, "
"; # "Length is 1"
printf "Contents are %vd
", $x; # "Contents are 400"
{
use bytes; # or "require bytes; bytes::length()"
print "Length is ", length $x, "
"; # "Length is 2"
printf "Contents are %vd
", $x; # "Contents are 198.144"
}
chr(), ord(), substr(), index() and rindex() behave similarly.
For more on the implications and differences between character semantics and byte semantics, see perluniintro and perlunicode.
LIMITATIONS
bytes::substr() does not work as an lvalue().
SEE ALSO
perluniintro, perlunicode, utf8
perl v5.16.3 2013-02-26 bytes(3pm)