Theres a left parenthesis missing at the start. In regexes, | is the "alternation" or "OR" operator, so above reads "match a number consisting of"
Code:
[0-9] a single digit OR
[1-9][0-9] two digits not starting with a zero OR
1[0-9]{2} three digits starting with a 1 OR
2[0-4][0-9] 200 - 249 OR
25[0-5] 25 followed by 0 - 5
This number followed by a single literal dot ( \. ) should occur three times ( {3} ) plus once again (without dot).
I am having trouble parsing rpm filenames in a shell script.. I found a snippet of perl code that will perform the task but I really don't have time to rewrite the entire script in perl. I cannot for the life of me convert this code into something sed-friendly:
if ($rpm =~ /(*)-(*)-(*)\.(.*)/)... (1 Reply)
cur_fy=`grep "CONSOL" $GLDATA/parms/cur_fiscalyear.lis | awk '{print $2}'
Here i don't understand "CONSOL" and awk'{print$2)
Please help me out
cur_fiscalyear.lis contents :
DL 2011
MOL 2011
MV 2011
SF 2010
CONSOL 2011
MVU 2011 (3 Replies)
cat $BDDATA/svucon$i_bal_dup_email.dat ; uuencode $dup_in $dup_out
here svucon$i_bal_dup_email.dat ???
and uuencode ??
Please use and tags when posting code, data or logs etc. to preserve formatting and enhance readability, thanks. (2 Replies)
Dear unix team
i'm user for a system build on unix system ,so we need to run a lot of scripts not in one sission but every script on the associated terminal , so the script name = the name of the terminal which will run this script on it . and someone create a batch that make as below :
1- but... (4 Replies)
Can someone do me a favour and explain the following for me:
((r=$RANDOM%$n+1))
I know what $RANDOM does but what is % sign and what does it do with %$n+1? (2 Replies)
I have a file of protein sequences with headers (my source file). Based on a list of IDs (which are included in some of the headers), I'd like to print out only the specified sequences, with only the ID as header.
In other words, I'd like to search source.txt for the terms in IDs.txt, and print... (3 Replies)
I am not a big expert in regex and have just little understanding of that language.
Could you help me to understand the regular Perl expression:
^(?!if\b|else\b|while\b|)(?:+?\s+){1,6}(+\s*)\(*\) *?(?:^*;?+){0,10}\{
------
This is regex to select functions from a C/C++ source and defined in... (2 Replies)
I'm trying to get some exclusions into our sendmail regular expression for the K command. The following configuration & regex works:
LOCAL_CONFIG
#
Kcheckaddress regex -a@MATCH
+<@+?\.++?\.(us|info|to|br|bid|cn|ru)
LOCAL_RULESETS
SLocal_check_mail
# check address against various regex... (0 Replies)
Discussion started by: RobbieTheK
0 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)