Sponsored Content
Full Discussion: Perl log parsing help
Top Forums Shell Programming and Scripting Perl log parsing help Post 302412275 by thegeek on Monday 12th of April 2010 07:07:44 AM
Old 04-12-2010
MySQL

Instead of doing your own loggers, and blocking.

You can take a look at fail2ban: Fail2ban
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

HTML parsing by PERL

i have a HTML report file..its in attachment(a part of the whole report is attached..name "input html.doc").also its source is attached in "report source code.txt" i just want to seperate the datas like in first line it should be.. NHTEST-3848498958-NHTEST-10.2-no-baloo a and so on for whole... (3 Replies)
Discussion started by: avik1983
3 Replies

2. Shell Programming and Scripting

Perl parsing compared to Ksh parsing

#! /usr/local/bin/perl -w $ip = "$ARGV"; $rw = "$ARGV"; $snmpg = "/usr/local/bin/snmpbulkget -v2c -Cn1 -Cn2 -Os -c $rw"; $snmpw = "/usr/local/bin/snmpwalk -Os -c $rw"; $syst=`$snmpg $ip system sysName sysObjectID`; sysDescr.0 = STRING: Cisco Internetwork Operating System Software... (1 Reply)
Discussion started by: popeye
1 Replies

3. Programming

Parsing a string in PERL

I have an extractfile (with fields delimited by pipes '|') and I want to prepend a counter based on the below requirements: - The counter starts at 3. - The counter increments only if the date (67th field of the extractfile) is different. Below is what I started off with: $cnt=2;... (3 Replies)
Discussion started by: ChicagoBlues
3 Replies

4. Shell Programming and Scripting

Perl script parsing Help

Hi All, I am looking for a parsing in perl script which will parse DJEČJI SVIJET. There is a unicode character above character C. How to parse the total DJEČJI SVIJET in perl. Regards, Harikrishna (3 Replies)
Discussion started by: Harikrishna
3 Replies

5. Shell Programming and Scripting

Perl parsing question

I need some help loading an array. I have two unique delimiters, but I keep running into recursion. #!/usr/bin/perl $INFILE="/root/scripts/data.txt"; $pat1="SCRIPT####"; $pat2="SCRIPT#echo"; $flag=0; $inc=0; $chunk=""; open(INFILE,"<$INFILE")|| die; while(<INFILE>) { if... (2 Replies)
Discussion started by: s_becker
2 Replies

6. Shell Programming and Scripting

Perl - switch parsing

I want to write a script that performs this type of behavior: Example: ./Myscript.pl -a ARGUMENTRun code 'a' ./Myscript.pl -b ARGUMENT Run code 'b' Do I use a case statement, functions? I am new to perl, just a code template on how to achieve this would be great. (1 Reply)
Discussion started by: streetfighter2
1 Replies

7. Shell Programming and Scripting

Parsing information in perl

So i'm trying to write a perl script that logins into a network switch via ssh: #sh ip traffic IP statistics: Rcvd: 1460119147 total, 563943377 local destination 0 format errors, 0 checksum errors, 48401998 bad hop count 0 unknown protocol, 8379279 not a gateway ... (2 Replies)
Discussion started by: streetfighter2
2 Replies

8. Shell Programming and Scripting

parsing argument in perl

in bash: LIST=`cat $1` for i in $LIST do ... done how will i do this in perl ? $1 is my first arguement. I'm a newbie in perl and will appreciate much your help guys ... (4 Replies)
Discussion started by: linuxgeek
4 Replies

9. UNIX for Advanced & Expert Users

Perl parsing help required.

Hello, I got a file like this. 5201 5202 5203 5204 1234 2345 3456 4567 6210 6220 6230 6240 The required output should be 5201 1234 6210 (9 Replies)
Discussion started by: suverman
9 Replies

10. Shell Programming and Scripting

Need help in parsing an input in perl

I am executing a command it is returning me something like this name ip port ------------------------------------ http-listener-1 * 6712 http-listener-2 * 8709 I have a subroutine getListenerName($porttobeChecked) This subroutine returns me the name of the listener if i pass a... (4 Replies)
Discussion started by: javaholics
4 Replies
map::slippy::fetcher(3tcl)					 Mapping utilities					map::slippy::fetcher(3tcl)

__________________________________________________________________________________________________________________________________________________

NAME
map::slippy::fetcher - Accessing a server providing tiles for slippy-based maps SYNOPSIS
package require Tcl 8.4 package require Tk 8.4 package require img::png package require map::slippy package require map::slippy::fetcher ?0.2? ::map::slippy::fetcher fetcherName levels url fetcherName levels fetcherName tileheight fetcherName tilewidth fetcherName get tile donecmd _________________________________________________________________ DESCRIPTION
This package provides a class for accessing http servers providing tiles for slippy-based maps. API
::map::slippy::fetcher fetcherName levels url Creates the fetcher fetcherName and configures it with the number of zoom levels supported by the tile server, and the url it is listening on for tile requests. The result of the command is fetcherName. METHODS fetcherName levels This method returns the number of zoom levels supported by the fetcher object, and the tile server it is accessing. fetcherName tileheight This method returns the height of tiles served, in pixels. fetcherName tilewidth This method returns the width of tiles served, in pixels. fetcherName get tile donecmd This is the main method of the fetcher, retrieving the image for the specified tile. The tile identifier is a list containing three elements, the zoom level, row, and column number of the tile, in this order. The command refix donecmd will be invoked when the fetcher either knows the image for the tile or that no image will forthcoming. It will be invoked with either 2 or 3 arguments, i.e. [1] The string set, the tile, and the image. [2] The string unset, and the tile. These two possibilities are used to either signal the image for the tile, or that the tile has no image defined for it. REFERENCES
[1] http://wiki.openstreetmap.org/wiki/Main_Page KEYWORDS
http, location, map, server, slippy, tile, url, zoom map 0.2 map::slippy::fetcher(3tcl)
All times are GMT -4. The time now is 03:31 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy