04-10-2008
hmm, a second though, it seems that something is still wrong
>cat /tmp/test
123 123 123 345
akljsdfaljskd 7878 7878 7878 7878 123
akljsdfaljskd 7878 7878 7878 7878 123 123 123 345 234 345 345
>sed 's/\([^ ]* \)\1*/\1/g' /tmp/test
123 345
akljsdfaljskd 7878 123
akljsdfaljskd 7878 123 345 234 345 345
note the last line, the duplicate "345" are still there
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
hi all,
i have a file contain multicolumns, this file is sorted by col2 and col3.
i want to remove the duplicated columns if the col2 and col3 are the same in another line.
example
fileA
AA BB CC DD
CC XX CC DD
BB CC ZZ FF
DD FF HH HH
the output is
AA BB CC DD
BB CC ZZ FF... (6 Replies)
Discussion started by: kamel.seg
6 Replies
2. Shell Programming and Scripting
Hi Guys...
Please Could you help me with the following ?
aaaa bbbb cccc sdsd
aaaa bbbb cccc qwer
as you can see, the 2 lines are matched in three fields...
how can I delete this pupicate ? I mean to delete the second one if 3 fields were duplicated ?
Thanks (14 Replies)
Discussion started by: yahyaaa
14 Replies
3. Shell Programming and Scripting
Hi,
i am using sed command to grep just a valuable data for my report generating. Thanks to the person who assists me on before thread. the problem that i encounter now is when i executed below command
The output will give me like below output in between the data, there is a double quote. How... (6 Replies)
Discussion started by: anakiar
6 Replies
4. Shell Programming and Scripting
Hi,
I would like to get rid of all comment in an xml file by grep or sed command:
The content seem like this:
<!-- ab cd
ef gh
ij kl -->
Anyone can help?
Thanks and Regards (3 Replies)
Discussion started by: RonLii
3 Replies
5. UNIX for Dummies Questions & Answers
Hi All,
I've got a file like this:
a 1 0 0 0 1 0 0 1 1 3 3 1 4 4 4
b 1 0 0 0 1 4 4 1 3 1 1 4 4 2 2
c 1 0 0 0 2 0 0 3 3 1 3 1 1 2 4
d 1 0 0 0 2 0 0 1 1 0 0 4 4 2 4
The file has ~4200 entries. I need to exclude those columns that are zeros for all those rows that have 2 in column 6. For... (0 Replies)
Discussion started by: zajtat
0 Replies
6. Shell Programming and Scripting
Hello,
I would like to remove the first column of lines beginning by a character (in my case is an open square bracket) and finishing by a space (or any other delimiter).
For example:
string1 string2 string3
to
string2 string3
I found this previous topic:
... (1 Reply)
Discussion started by: stoyanova
1 Replies
7. UNIX for Dummies Questions & Answers
hi!
could u help in the following? I have the data (long list!) that looks like (three coumns white space separated):
rs3094315 0.0665173 742429
rs12562034 0.0738998 758311
rs3934834 0.396449 995669
rs9442372 0.402693 1008567
rs3737728 0.406271 1011278
rs6687776 0.435429 1020428
rs9651273... (4 Replies)
Discussion started by: kush
4 Replies
8. Shell Programming and Scripting
so i have strings such as this:
'postfix/local#2,5#|CRON.*12062.*root.*CMD#2,5#|roice.*NQN1#1,2#|toysprc#1,4#'
i need to get rid of the "#" and the numbers between them for each of the strings above. so the desired output should be:
... (1 Reply)
Discussion started by: SkySmart
1 Replies
9. UNIX for Dummies Questions & Answers
Hi,
I would like to know how can I use sed in all columns of a file tab separated.
Example of input file:
0/0:0:1,0,0 0/2:0:0,2,0
Desired output file:
1,0 0,2 (3 Replies)
Discussion started by: fadista
3 Replies
10. Shell Programming and Scripting
Hi all,
I'd always appreciate all helps from this site.
I would like to delete duplicated chunks of strings on the same row(?).
One chunk is comprised of four lines such as:
path name
starting point
ending point
voltage number
I would like to delete duplicated chunks on the same... (5 Replies)
Discussion started by: jypark22
5 Replies
LEARN ABOUT DEBIAN
algorithm::checkdigits::m11_010
CheckDigits::M11_010(3pm) User Contributed Perl Documentation CheckDigits::M11_010(3pm)
NAME
CheckDigits::M11_010 - compute check digits AHV number (CH)
SYNOPSIS
use Algorithm::CheckDigits;
$ahv = CheckDigits('ahv_ch');
if ($ahv->is_valid('123.45.678.113')) {
# do something
}
$cn = $ahv->complete('123.45.678.11');
# $cn = '123.45.678.113'
$cd = $ahv->checkdigit('123.45.678.113');
# $cd = '3'
$bn = $ahv->basenumber('123.45.678.113');
# $bn = '123.45.678.11';
DESCRIPTION
ALGORITHM
1. Beginning left every digit is weighted with 5,4,3,2,7,6,5,4,3,2.
2. The weighted digits are added.
3. The sum from step 2 is taken modulo 11.
4. The checkdigit is 11 minus the sum from step 3. Is the difference 10, the number won't be taken. If the difference is 11, the
checkdigit is 0.
METHODS
is_valid($number)
Returns true only if $number consists solely of numbers and hyphens and the two digits in the middle are valid check digits according
to the algorithm given above.
Returns false otherwise,
complete($number)
The check digit for $number is computed and inserted into the middle of $number.
Returns the complete number with check digit or '' if $number does not consist solely of digits, hyphens and spaces.
basenumber($number)
Returns the basenumber of $number if $number has a valid check digit.
Return '' otherwise.
checkdigit($number)
Returns the check digits of $number if $number has valid check digits.
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_010(3pm)