04-07-2007
dsravan,
You said:
" have 580 bad records meaning like they were spread on to 2 lines"
The 3rd record in your sample is not spread on to 2 lines.
Could you please clarify?
Thanks.
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi all,
I'm trying in vain to workout how I can generate a report from a months worth of files that get created every day. There is one file per day and each daily file contain the output from a df -v command.
With the following section of code ...
for xdffile in $1$2/df??
do
... (4 Replies)
Discussion started by: Cameron
4 Replies
2. Shell Programming and Scripting
Hi All
I am reading data from the database and writing to temporary file in the below format.
1=XP|external_component|com.adp.meetingalertemail.processing.MeetingAlertEmail|EMAILALERTPUSH|32|4#XP |classpath|/usr/home/dfusr/lib/xalan.jar:
/usr/home/dfusr/lib/xerces.jar: ... (2 Replies)
Discussion started by: rajeshorpu
2 Replies
3. Shell Programming and Scripting
I've never written scripts (just switched from Ada to C++). I have a book that's over my head and a few examples, other then that I'm floundering. Everything here at work is being done in C Shell. None of the C++ programmers are experienced in shell scripting.
I have a data file with the... (2 Replies)
Discussion started by: bassmaster
2 Replies
4. Shell Programming and Scripting
OK I will do my best to explain what I need help with.
I am trying to format an ldif file so I can import it into Oracle oid.
I need the file to look like this example. Keep in mind there are 3000 of these in the file.
changetype: modify
replace: userpassword
dn:... (0 Replies)
Discussion started by: timothyha22
0 Replies
5. Shell Programming and Scripting
Below is the data content of file_1 and file_2:
file_1
>sample_1
FKGJGPOPOPOQA
ASDADWEEWERE
ASDAWEWQWRW
ASDASDASDASDD
file_2
>sample_1
DRTOWPFPOPOQA
ASDADWEEASDF
ASDADRTYWRW
ASDASDASDASDD
I got try the following perl script. Unfortunately, it can't give my desired output result... (7 Replies)
Discussion started by: patrick87
7 Replies
6. Shell Programming and Scripting
Input file
>Read_1
XXXXXXXXXXSDFXXXXXDS (condition 1: After the last "X" per line, if the distance is less than or equal to 3 letter, replace those not "X" letter with "X")
TREXXXXXXXSDFXXXXXDS (condition 2: Before the first "X" per line, if the distance is less than or equal to 3 letter,... (12 Replies)
Discussion started by: patrick87
12 Replies
7. Shell Programming and Scripting
I got three different file:
Part of File 1
ARTPHDFGAA
.
.
Part of File 2
ARTGHHYESA
.
.
Part of File 3
ARTPOLYWEA
.
. (4 Replies)
Discussion started by: patrick87
4 Replies
8. UNIX for Dummies Questions & Answers
Hi Guys,
Please help me with my problem here:
I have a source file:
1212 23232 343434 ASAS1 4
3212 23232 343434 ASAS2 4
3234 23232 343434 QWQW1 4
1134 23232 343434 QWQW2 4
3212 23232 343434 QWQW3 4
and a mapping... (4 Replies)
Discussion started by: kokoro
4 Replies
9. Shell Programming and Scripting
Hi, Great minds, I have some files, in fact header files, of CTD profiler, I tried a lot C programming, could not get output as I was expected, because my programming skills are very poor, finally, joined unix forum with the hope that, I may get what I want, from you people,
Here I have attached... (17 Replies)
Discussion started by: nex_asp
17 Replies
10. Shell Programming and Scripting
Dears,
I'm new to shell scripting and i was wondering if you can help me with following matter.
I have a file containing 400,000 records. The file contains two columns like:
00611291,0270404000005453
25262597,1580401000016155
25779812,1700403000001786
00388934,1200408000000880... (1 Reply)
Discussion started by: paniklas
1 Replies
LEARN ABOUT DEBIAN
algorithm::checkdigits::m10_005
CheckDigits::M10_005(3pm) User Contributed Perl Documentation CheckDigits::M10_005(3pm)
NAME
CheckDigits::M10_005 - compute check digits for Deutsche Post Identcode/Leitcode (DE)
SYNOPSIS
use Algorithm::CheckDigits;
$ic = CheckDigits('identcode_dp');
if ($ic->is_valid('21.802 580.906 6')) {
# do something
}
$cn = $ic->complete('21.802 580.906');
# $cn = '21.802 580.9066'
$cd = $ic->checkdigit('21.802 580.906 6');
# $cd = '6'
$bn = $ic->basenumber('21.802 580.906 6');
# $bn = '21.802 580.906'
DESCRIPTION
ALGORITHM
1. Beginning left all numbers are weighted alternatively 4 and 9.
2. The sum of all products is computed.
3. The sum of step 3 ist taken modulo 10.
4. The check digit is the difference between 10 and the number from step 3.
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::M10_005(3pm)