03-05-2008
Perl script to scan through files
Dear perl gurus,
I plan to create a script that will scan through a logfile line by line.
And if ever a certain line meets the below conditions, it will alert me via email.
-->
a) Position 10 to 13 = "ABCD"
b) And also if the amount specified in position 620-640 is less than the amount in position 560-580
Ex: Position620-640 = 00000002000000.000000
Position560-580 = 00000005000000.000000
Thanks in advance
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi,
Can any one please suggest me commands for making port scan shell script. (3 Replies)
Discussion started by: nrbhole
3 Replies
2. Shell Programming and Scripting
Hi Perl gurus,
I have this file to scan through. Sample lines below:
2008031A, USERNAME, 12345, give ABC, take XYZ, transaction submitted
2008031B, USERNAME, 12346, waiting for processing
2008031C, USERNAME, 12347, Retrieving response
2008031D, USERNAME, 12348, This is not a valid dealing... (3 Replies)
Discussion started by: gholdbhurg
3 Replies
3. UNIX for Dummies Questions & Answers
Hi gang,
I have a project I would like to work on as I learn perl & ruby scripting. Maybe a big bite to chew off at first, but that's how I like to learn. Attack a real world problem.
I would like to enhance our response to spam attacks here at our office where we run mail, dhcp, dns... (7 Replies)
Discussion started by: tonyd
7 Replies
4. Shell Programming and Scripting
i need to create a shell script, which will go into a directory , and scan the files in it for defined errors, there will be around 10 files in the directory. (3 Replies)
Discussion started by: deeprajn95
3 Replies
5. Shell Programming and Scripting
Hello,
Im new to shell scripting , and i have the following question .
The hcitool scan command returns the bluetooth address of the phone . When it is run the output is something like
Scanning....
00:A1:5D:AB:B2:E9 Nokia 6600
Can i get the output in a varaiable in a... (1 Reply)
Discussion started by: rahulkhn
1 Replies
6. Shell Programming and Scripting
Hi,
I am new to perl:
I need to write perl script to list all the files present in directory and mail should be come to my inbox with all the files present in that directory.
advanced thanks for valuable inputs.
Thanks
Prakash GR (1 Reply)
Discussion started by: prakash.gr
1 Replies
7. Shell Programming and Scripting
Hi,
I am fairly new to unix/linux scripting (about 1 week) and have written a script to scan a directory for xml files, if found call and oracle procedure passing in the file name and then move the file once processed to an archive area.
Now everything seems to be working except when there... (3 Replies)
Discussion started by: apacheuk
3 Replies
8. Shell Programming and Scripting
Dear Experts,
Have been seraching this forum from this morning for my query but dint find hence posting it her... Basically i have two input files BSS and MSS which has a unique string , hence i hav tried and seperated the text to compare frm both files .. Any my present input files look like... (6 Replies)
Discussion started by: shaliniyadav
6 Replies
9. Shell Programming and Scripting
Hello all,
I have some .html files on my hard drive and trying to figure out (if it's possible) how to scan the files in the directory for <a> anchor tags to find linked files. I know how to bring the files in with Perl, but as text. Wondering if there's a way to probe the file for... (2 Replies)
Discussion started by: sldsand
2 Replies
10. Shell Programming and Scripting
Gents,
Please can you help.
I want to create a list which contends the complete patch of the location of some directories with the size of each file.
need to select only .txt file
In this case I am try to find the subdirectories tp1 and tp2 and create the output list.
jd175-1
tp1... (3 Replies)
Discussion started by: jiam912
3 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)