Hi
I need to calculate the number of occurrences of a item in a number of files using Perl.
The item appears continually throughout the files but in each case I only want to calculate it in certain blocks of the file.
Example - Calculalte the number of occurrences of a 'pass' in a block of... (0 Replies)
frnds,
I m having prob woth doing some 2-3 task simultaneously...
what I want is...
I have lots ( lacs ) of files in a dir...
I want.. these info from arround 2-3 months files
filename convention is - abc20080403sdas.xyz ( for todays files )
I want
1. total no of files for 1 dec... (1 Reply)
Given the following text in a file named extract.txt:
listenPort:=25
smtpDestination:=2
enableSSL:=
I am trying to extract only the value 2 following smtpDestination:=
Someone had suggested I use:
sed -e "s/^smtpDestination:=\(.*\)$/\1/" extract.txt
but this returns:
listenPort:=25
2
... (2 Replies)
I have attached a txt file, what I would like to be able to do is:
1. Extract Data from Columns labeled E/N and Ko into a new file
2. Then in the new file I would like to be able to plot E/N on the X axis and Ko on the y axis.
3. Lastly I would like to be able to extract multiple data sets and... (6 Replies)
Folks
Appreciate your help in understanding issue in relation to below.
I need to pul uvalue from a file (tmpfile) and compare it with a number to make decision.
Using #!/bin/sh
contents of tmpfile :
Slot uvalue : 0.16
How I am pulling it:
unifval=`awk '/uvalue/ {print $4}' tmpfile` ... (1 Reply)
Hi
I have the following data :
<Cell id="34A" ref="ds:/BTS:34/Cells/Cell:34A"/>
<Cell id="34B" ref="ds:/BTS:34/Cells/Cell:34B"/>
<Cell id="34C" ref="ds:/BTS:34/Cells/Cell:34C"/>
I would like to print this data in the following format :
BTS:34 Cell:34A.I'm... (9 Replies)
Hi,
I have one file, say file 1, that has data like below where 19900107 is the date,
19900107 12 144 129 0.7380047
19900108 12 168 129 0.3149017
19900109 12 192 129 3.2766666E-02
... (3 Replies)
I have a txt file of the following format
>ab_
qwerty
>rt_
hfjkil
>Ty2
hglashglkasghkf;
>P2
aklhfklflkkgfgkfl
>ui_
vnllkdskkkffkfkkf
>we32
vksksjksj;lslsf'sk's's
....
.....
I want to split this big file based on the header (>) (5 Replies)
I am trying to compare the data in lines 3 & 5 to see if they match up to the '-S570' (see first code set, all proprietary information has been removed from code set)
spawn telnet
Trying ...
Connected to CA-LOS1234-ASE-S570.cl .
Escape character is '^]'.
CA-LOS1234-ASE-S570
Username: ... (1 Reply)
Discussion started by: slipshft
1 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)