#!/usr/bin/env ruby
vmachines=%w(IIBVICDMS01 IIBVICMA01)
#vmachines=%w(IIBSBS IIBVICDMS01 IIBVICMA01)
s=""
while line=gets
host=line.split[-1] if line =~ /Copying/
if line.match("Duration")
setter = 0 and s << line
if vmachines.include?(host)
File.open("/tmp/vdrlog-"+host+".txt","w") {|x| x.puts s }
end
s=""
elsif line.match("Normal")
setter=1
end
s <<line if setter
end
Code:
<your command/script that generate the output> ... | ruby myscript.rb
I need to get a section of a file based on 2 params. I want the part of the file between param 1 & 2. I have tried a bunch of ways and just can't seem to get it right. Can someone please help me out.....its much appreciated. Here is what I have found that looks like what I want....but doesn't... (12 Replies)
hi, i have a very long text file. i need to extract with grep command a certain part.
for example text file include 1ooo rows:
1....
2...
3...
.
.
.
1000
i want to view with grep only rows 50-100.
any ideas will be appreciated
thanks... (8 Replies)
Hi,
I understand either AWK or SED can do this, but I not sure how to extract the following configuration in section. Meaning when I need to find code with " ip helper-address 192.168.11.2" , it would start from "interface Serial0/0" and "interface FastEthernet0/1". Only displaying both section... (2 Replies)
Hi,
I have a file formated like this:
John 7.22 2010-01-25_17:01:36
George 8.22 2010-01-25_17:02:36
Bob 9.62 2010-01-25_17:04:36
Jane 10.11 2010-01-25_17:05:36
Emma 4.52 2010-01-25_17:01:36
What I want to do is cut out only the entries that have... (2 Replies)
Hello Team ,
I have to extract date section from the below file output. The output of the file is as shown below.
I have to extract the "" this section from the above output of the file. can anyone please let me know how can we acheive this? (4 Replies)
Hi Everyone,
I need some help to accomplish the below. help is highly appriciated.
I have a 45 mb file with ldap entries. Each user entry is separated by a string # entry-id: 1 and so on. Some of the entries has a string xyz: true. I want to delete the section if the user section has xyz: true... (6 Replies)
I have searched in a variety of ways in a variety of places but have come up empty.
I would like to prepend a portion of a section header to each following line until the next section header. I have been using sed for most things up until now but I'd go for a solution in just about anything--... (7 Replies)
Hi Guru's,
I am new to unix scripting. I have a huge file with user details in it(file2) and I have another file with a list of users(file1). Script has to search a user from file1 and get all the associated lines from file2.
Example:
fiel1:
cn=abc
cn=DEF
cn=xyx
File 2:
dn:... (10 Replies)
Discussion started by: Samingla
10 Replies
LEARN ABOUT SUSE
tap::parser::source
TAP::Parser::Source(3pm) Perl Programmers Reference Guide TAP::Parser::Source(3pm)NAME
TAP::Parser::Source - Stream output from some source
VERSION
Version 3.17
SYNOPSIS
use TAP::Parser::Source;
my $source = TAP::Parser::Source->new;
my $stream = $source->source(['/usr/bin/ruby', 'mytest.rb'])->get_stream;
DESCRIPTION
Takes a command and hopefully returns a stream from it.
METHODS
Class Methods
"new"
my $source = TAP::Parser::Source->new;
Returns a new "TAP::Parser::Source" object.
Instance Methods
"source"
my $source = $source->source;
$source->source(['./some_prog some_test_file']);
# or
$source->source(['/usr/bin/ruby', 't/ruby_test.rb']);
Getter/setter for the source. The source should generally consist of an array reference of strings which, when executed via
&IPC::Open3::open3, should return a filehandle which returns successive rows of TAP. "croaks" if it doesn't get an arrayref.
"get_stream"
my $stream = $source->get_stream;
Returns a TAP::Parser::Iterator stream of the output generated by executing "source". "croak"s if there was no command found.
Must be passed an object that implements a "make_iterator" method. Typically this is a TAP::Parser instance.
"merge"
my $merge = $source->merge;
Sets or returns the flag that dictates whether STDOUT and STDERR are merged.
SUBCLASSING
Please see "SUBCLASSING" in TAP::Parser for a subclassing overview.
Example
package MyRubySource;
use strict;
use vars '@ISA';
use Carp qw( croak );
use TAP::Parser::Source;
@ISA = qw( TAP::Parser::Source );
# expect $source->(['mytest.rb', 'cmdline', 'args']);
sub source {
my ($self, $args) = @_;
my ($rb_file) = @$args;
croak("error: Ruby file '$rb_file' not found!") unless (-f $rb_file);
return $self->SUPER::source(['/usr/bin/ruby', @$args]);
}
SEE ALSO
TAP::Object, TAP::Parser, TAP::Parser::Source::Perl,
perl v5.12.1 2010-04-26 TAP::Parser::Source(3pm)