To my understanding , the above select will look for the number between 0 to 9 which should no exceed character 10.
It will look for exactly 10 digits in a row.
These exact 10 digits can appear anywhere in the line.
Quote:
If my above statement correct, then i should get the 8 digit mobile number in below select statement, but i am getting 10 and 8 digit number. it suppose to look for 0 to 9 and give 8 digit mobile number. please correct me if i am wrong.
It will find 8 digits inside 10 digits, the same way it will find 'gas' inside 'gasoline'.
To find only 8 digits you must be more specific. Perhaps
to tell it there must be a space in front, and that the string must end at the end of the line.
Hi,
I'm trying following:echo "test line XA24433 test" | sed 's/.*X\(.*\)/X\1/'
XA24433 test While I want the output as: XA24433
I want to grab the words starting with letter X till the next space, this word can be anywhere in the line. (9 Replies)
Hi!
I'm trying to write a regexp but I have no luck...
I have a string like this:
param1=sometext¶m2=hello¶m3=bye
Also, the string can be simply:
param2=hello
I want to return the value of param2: "hello".
How can I do this?
Thanks. (3 Replies)
Hello,
I would like to replace Line 187 of my file named run_example.
The original line is below, including the spaces:
celldm(1) = 6.00,
I want it to become something like
celldm(1) = 6.05,
or
celldm(1) = 6.10,
where the number is stored in a variable called... (6 Replies)
Hi
I need to get text that are within ""
For example
File:
asdasd "test test2" sadasds asdda asdasd "demo demo2"
Output:
test test2 demo demo2
Any help is good
Thank you (12 Replies)
please consider this:
echo "11111*X*005010X279~ST*270*1111111*005010X279~BHT*0011*11" | sed 's/.*\(005010X(\d)(\d)(\d)*\).*$/\1/'i'm searching for first occurrence of 005010X while leaving rest of characters out.
:confused:
any tips? thnx in advance guys. (7 Replies)
Hi ,
I am learing sed
echo abc 123 def 456 | sed 's|\(*\) \(*\)|\1|'
is returning abc def 456
i was hoping abc def "\1" should only print the occurence of the first pattern
but according to my understanding it is just removing the first occurence of the second pattern... (7 Replies)
Hi all,
I want to get a substring from a string based on given delimiter, for example:
str="foo|bar|baz" with delimiter "|",
I want to get one substring at each time with the order number the substring in the whole string,
given 1 to get "foo",
given 2 to get "bar",
given 3 to get "baz",
I... (2 Replies)
Hello All,
I'm trying to extract the lines between two consecutive elements of an array from a file.
My array looks like:
problem_arr=(PRS111 PRS213 PRS234)
j=0
while } ]
do
k=`expr $j + 1`
sed -n "/${problem_arr}/,/${problem_arr}/p" problemid.txt
---some operation goes... (11 Replies)
Hi , I need to remove pipe character from a |^ delimeted file.
Something like |^tran|sformers||^|revenge |of fallen|^ to
|^transformers|^revenge of fallen|^...
Cold anybody please help to build the regular expression using sed .
many thanks.
Please use code tags next time for... (1 Reply)
Discussion started by: kokjek
1 Replies
LEARN ABOUT DEBIAN
algorithm::checkdigits::m11_011
CheckDigits::M11_011(3pm) User Contributed Perl Documentation CheckDigits::M11_011(3pm)NAME
CheckDigits::M11_011 - compute check digits for VAT Registration Number (NL)
SYNOPSIS
use Algorithm::CheckDigits;
$ustid = CheckDigits('ustid_nl');
if ($ustid->is_valid('123456782')) {
# do something
}
if ($ustid->is_valid('123456782B04')) {
# do something
}
$cn = $ustid->complete('12345678');
# $cn = '123456782'
$cn = $ustid->complete('12345678.B04');
# $cn = '123456782B04'
$cd = $ustid->checkdigit('123456782');
# $cd = '2'
$cd = $ustid->checkdigit('123456782B04');
# $cd = '2'
$bn = $ustid->basenumber('123456782');
# $bn = '12345678';
$bn = $ustid->basenumber('123456782B04');
# $bn = '12345678.B04';
DESCRIPTION
This VATRN has 12 "digits", the third last must be a B, the fourth last is the checkdigit. I don't know anything about the meaning of the
last two digits.
You may use the whole VATRN or only the first eight digits to compute the checkdigit with this module.
ALGORITHM
1. Beginning right with the digit before the checkdigit all digits are weighted with their position. I.e. the digit before the checkdigit
is multiplied with 2, the next with 3 and so on.
2. The weighted digits are added.
3. The sum from step 2 is taken modulo 11.
4. If the sum from step 3 is 10, the number is discarded.
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.
SEE ALSO
perl, CheckDigits, www.pruefziffernberechnung.de,
AUTHOR
Mathias Weidner, <mathias@weidner.in-bad-schmiedeberg.de>
COPYRIGHT AND LICENSE
Copyright 2004,2005 by Mathias Weidner
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.10.0 2008-05-17 CheckDigits::M11_011(3pm)