10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
In the awk I am trying to subtract the difference $3-$2 of each matching $4 before the first _ (underscore) and print that value in $13.
I think the awk will do that, but added comments. What I am not sure off is how to add a line or lines that will add sum each matching $13 value and put it in... (2 Replies)
Discussion started by: cmccabe
2 Replies
2. AIX
We found out that the Spectrum Scale (GPFS) doesnt support mix nodes (AIX and RHEL) on direct attached storage.
Is there any other options besides NFS for mix O/S? Trying to avoid network type of shared filesystem which might end up high traffic on IO because we do run backup jobs on those... (0 Replies)
Discussion started by: kiasu
0 Replies
3. Programming
I think both write at the end of the file ......
but is there a sharp difference between those 2 instruction .....
thank you
this is my 3rd question today forgive me :D (1 Reply)
Discussion started by: fwrlfo
1 Replies
4. Emergency UNIX and Linux Support
I haven't been able to do anything since yesterday evening because my account is full to the brim. Very annoying on a Friday evening when no admin will be in until Monday morning. Of course, I might consider cleaning up if I knew where the problem is, but I can't figure it out because du and df... (8 Replies)
Discussion started by: mregine
8 Replies
5. Shell Programming and Scripting
I want to add column btw to column
Input
ABCDE2012 120 21.6
ABCDE2012 126 0.9
PLKJHN2012 128 20.2
UNHYT2012 1210 -0.3
Output//
Column 1 Column 2 Cl 3 Cl4
ABCDE2012 ABCDE2012120 120 21.6
ABCDE2012 ABCDE2012126 126 0.9
PLKJHN2012 PLKJHN2012128 128 20.2... (3 Replies)
Discussion started by: pareshkp
3 Replies
6. Solaris
Hi guys,
Hope u r doing find. I have this query. When we check the manual pages for a certain command, say man cat
we see the manual page with more
What is UNIX really doing here, I mean why not less command instead of more command. And can we have UNIX display the manual pages with less command... (2 Replies)
Discussion started by: gabam
2 Replies
7. Shell Programming and Scripting
Hello friends,
I have a C source code containing sql statements. I use the following sed command to print all the sql blocks in the source code....
sed -n "/exec sql/,/;/p" Sample.cpp
The above sed command will print the sql blocks based on the pattern "exec sql" & ";"... (2 Replies)
Discussion started by: frozensmilz
2 Replies
8. UNIX for Dummies Questions & Answers
filename contains:
123 4
1234 5
12345 689
i want result:
1234
12345
12345679
cat filename | awk '{print $1, $2, $3}' will get my result, but too many $$s.
sed -e 's///g' filename will take care one space, will take 2 spaces.
is it a short way to do this ? (7 Replies)
Discussion started by: tjmannonline
7 Replies
9. Shell Programming and Scripting
Hi all,
what does this mean?
if
then
<something>
fi
here is what i know..
it checks if the specified argument no($devid) in some function call is made into a block device and then proceeds with the execution of the loop.
However am not understand what lofi@0:means?
also is there... (5 Replies)
Discussion started by: wrapster
5 Replies
10. UNIX for Advanced & Expert Users
hi
Can any one explain me difference between @# and @* with the help of examples?
Thanks (3 Replies)
Discussion started by: rochitsharma
3 Replies
CheckDigits::M11_001(3pm) User Contributed Perl Documentation CheckDigits::M11_001(3pm)
NAME
CheckDigits::M11_001 - compute check digits for ISBN, ISSN, VAT RN (PT), HKID (HK), Wagon number (BR), NHS (GB), VAT (SL)
SYNOPSIS
use Algorithm::CheckDigits;
$isbn = CheckDigits('isbn');
if ($isbn->is_valid('3-88229-192-3')) {
# do something
}
$cn = $isbn->complete('3-88229-192-');
# $cn = '3-88229-192-3'
$cd = $isbn->checkdigit('3-88229-192-3');
# $cd = '3'
$bn = $isbn->basenumber('3-88229-192-3');
# $bn = '3-88229-192-'
DESCRIPTION
ALGORITHM
1. The sequence of digits is processed right to left. Every digit is multiplied with their position in the sequence (i.e. the digit left
to the check digit has the weight 2 then 3 etc.).
With a Hongkong ID (hkid) the leftmost char is replaced with its position in the alphabet and then multiplied with 8 (its weight).
2. The sum of all products is computed.
3. The sum of step 2 is taken modulo 11.
4. The checkdigit is the difference of the sum from step 3 to eleven under the following conditions:
isbn,issn
If the difference is 10, the check digit is 'X'.
If the difference is 11, the check digit is 0.
ustid_pt
If the difference is greater then 9, the check digit is '0'.
hkid If the difference is 10, the check digit is 'A'.
If the difference is 11, the check digit is 0.
wagonnr_br
If the difference is 10, the check digit is 0.
If the difference is 11, the check digit is 1.
nhs_gb If the difference is 10, the number would not be taken.
If the difference is 11, the check digit is 0.
vat_sl This is a little bit unclear, don't trust on the method for this type.
METHODS
is_valid($number)
Returns true only if $number consists solely of numbers and the last digit is a valid check digit according to the algorithm given
above.
Returns false otherwise,
complete($number)
The check digit for $number is computed and concatenated to the end of $number.
Returns the complete number with check digit or '' if $number does not consist solely of digits and spaces.
basenumber($number)
Returns the basenumber of $number if $number has a valid check digit.
Return '' otherwise.
checkdigit($number)
Returns the checkdigit of $number if $number has a valid check digit.
Return '' otherwise.
EXPORT
None by default.
AUTHOR
Mathias Weidner, <mathias@weidner.in-bad-schmiedeberg.de>
SEE ALSO
perl, CheckDigits, www.pruefziffernberechnung.de.
perl v5.10.0 2008-05-17 CheckDigits::M11_001(3pm)