I'm trying to parse hundreds of log files in a directory. One log file looks similar to below:
I would like to search for strings with sed and put the results into a csv. I can search for the right patterns, but I'm having trouble printing it correctly.
suppose if u have a file like that
Hen ABCCSGSGSGJJJJK 15
Cock ABCCSGGGSGIJJJL 15
* * * * * * : * * * . * * * :
Hen CFCDFCSDFCDERTF 30
Cock CHCDFCSDHCDEGFI 30
* . * * * * * * * : * * :* : : .
The output shud be
where there is : and .
It shud... (4 Replies)
I am looking for a script to do the following. I have a large log file that contains hundreds of warnings, a lot of which can be ignored. The tool doesn't allow me to suppress it, so I like to parse it out from the log file and isolate just the new messages/warnings, based on an exception file.
... (12 Replies)
Hi there, am trying to parse an Apache 'server' config file. A snippet of the config file is shown below:
.....
ProxyPassReverse /foo http://foo.example.com/bar
.....
.....
RewriteRule ^/(.*) http://www.example.com/$1
RewriteRule /redirect https://www.example1.com/$1
........ (7 Replies)
Hi all:
I'm working on a HPUX 11.23 system and I am needing to parse a tomcat-jakarta log file for memory use. Getting the desired data is easy, assuming the log file does not grow. This file grows constantly and I want to check it q 5 min. The next check will pick up from where it left off 5... (4 Replies)
./abc.sh started at Sun Oct 24 06:42:04 PDT 2010
Message:
=======
Summary Report of NAME count
-----------------------------------------------------------------
Below is the output of the SQL query :-
NAME COUNT... (2 Replies)
Hi everyone,
another question while using sed.
my sed statement should parse every line in a file and store all "i" variable item a a new file.
any wrong arguments here?
Thanks a million.
task_name => name,
object_type => 'TABLE',
attr1 => 'TestR3',
attr2 => '$i',
for i... (4 Replies)
Hello All,
Below is the excerpt from my Informatica log file which has 4 blocks of lines (starting with WRITER_1_*_1). Like these my log file will have multiple blocks of same pattern.
WRITER_1_*_1> WRT_8161
TARGET BASED COMMIT POINT Thu May 08 09:33:21 2014... (13 Replies)
I have a log file that's created daily by this command:
sar -u 300 288 >> /var/log/usage/$(date "+%Y-%m-%d")_$(hostname)_cpu.log
It that contains data like this:
Linux 3.16.0-4-amd64 (myhostname) 08/15/2015 _x86_64_ (1 CPU)
11:34:17 PM CPU %user %nice ... (12 Replies)
Discussion started by: unplugme71
12 Replies
LEARN ABOUT MOJAVE
path::class5.18
Path::Class(3) User Contributed Perl Documentation Path::Class(3)NAME
Path::Class - Cross-platform path specification manipulation
VERSION
version 0.33
SYNOPSIS
use Path::Class;
my $dir = dir('foo', 'bar'); # Path::Class::Dir object
my $file = file('bob', 'file.txt'); # Path::Class::File object
# Stringifies to 'foo/bar' on Unix, 'fooar' on Windows, etc.
print "dir: $dir
";
# Stringifies to 'bob/file.txt' on Unix, 'bobfile.txt' on Windows
print "file: $file
";
my $subdir = $dir->subdir('baz'); # foo/bar/baz
my $parent = $subdir->parent; # foo/bar
my $parent2 = $parent->parent; # foo
my $dir2 = $file->dir; # bob
# Work with foreign paths
use Path::Class qw(foreign_file foreign_dir);
my $file = foreign_file('Mac', ':foo:file.txt');
print $file->dir; # :foo:
print $file->as_foreign('Win32'); # foofile.txt
# Interact with the underlying filesystem:
# $dir_handle is an IO::Dir object
my $dir_handle = $dir->open or die "Can't read $dir: $!";
# $file_handle is an IO::File object
my $file_handle = $file->open($mode) or die "Can't read $file: $!";
DESCRIPTION
"Path::Class" is a module for manipulation of file and directory specifications (strings describing their locations, like
'/home/ken/foo.txt' or 'C:WindowsFoo.txt') in a cross-platform manner. It supports pretty much every platform Perl runs on, including
Unix, Windows, Mac, VMS, Epoc, Cygwin, OS/2, and NetWare.
The well-known module File::Spec also provides this service, but it's sort of awkward to use well, so people sometimes avoid it, or use it
in a way that won't actually work properly on platforms significantly different than the ones they've tested their code on.
In fact, "Path::Class" uses "File::Spec" internally, wrapping all the unsightly details so you can concentrate on your application code.
Whereas "File::Spec" provides functions for some common path manipulations, "Path::Class" provides an object-oriented model of the world of
path specifications and their underlying semantics. "File::Spec" doesn't create any objects, and its classes represent the different ways
in which paths must be manipulated on various platforms (not a very intuitive concept). "Path::Class" creates objects representing files
and directories, and provides methods that relate them to each other. For instance, the following "File::Spec" code:
my $absolute = File::Spec->file_name_is_absolute(
File::Spec->catfile( @dirs, $file )
);
can be written using "Path::Class" as
my $absolute = Path::Class::File->new( @dirs, $file )->is_absolute;
or even as
my $absolute = file( @dirs, $file )->is_absolute;
Similar readability improvements should happen all over the place when using "Path::Class".
Using "Path::Class" can help solve real problems in your code too - for instance, how many people actually take the "volume" (like "C:" on
Windows) into account when writing "File::Spec"-using code? I thought not. But if you use "Path::Class", your file and directory objects
will know what volumes they refer to and do the right thing.
The guts of the "Path::Class" code live in the Path::Class::File and Path::Class::Dir modules, so please see those modules' documentation
for more details about how to use them.
EXPORT
The following functions are exported by default.
file
A synonym for "Path::Class::File->new".
dir A synonym for "Path::Class::Dir->new".
If you would like to prevent their export, you may explicitly pass an empty list to perl's "use", i.e. "use Path::Class ()".
The following are exported only on demand.
foreign_file
A synonym for "Path::Class::File->new_foreign".
foreign_dir
A synonym for "Path::Class::Dir->new_foreign".
tempdir
Create a new Path::Class::Dir instance pointed to temporary directory.
my $temp = Path::Class::tempdir(CLEANUP => 1);
A synonym for "Path::Class::Dir->new(File::Temp::tempdir(@_))".
Notes on Cross-Platform Compatibility
Although it is much easier to write cross-platform-friendly code with this module than with "File::Spec", there are still some issues to be
aware of.
o On some platforms, notably VMS and some older versions of DOS (I think), all filenames must have an extension. Thus if you create a
file called foo/bar and then ask for a list of files in the directory foo, you may find a file called bar. instead of the bar you were
expecting. Thus it might be a good idea to use an extension in the first place.
AUTHOR
Ken Williams, KWILLIAMS@cpan.org
COPYRIGHT
Copyright (c) Ken Williams. All rights reserved.
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Path::Class::Dir, Path::Class::File, File::Spec
perl v5.18.2 2017-10-06 Path::Class(3)