I have a file like
I want to parse every seven line at a time , where I have to choose only 1,2,6,7 lines to display in some formatted way .
Example for the first 7 lines the output should be like
The above format goes for each set of 7 lines , the above example is for first 7 lines only.
Please avoid Perl in answer because I am not aware of that .
If this could be done in awk , as I am not able to find an answer.
I am an Awk newbie and cannot wrap my brain around my problem:
Given multi-line records of varying lengths separated by a blank line I need to skip the first two lines
of every record and extract every-other line in each record unless the first line of the record has the word "(CONT)" in the... (10 Replies)
I need a script to process a huge single line text file:
The sample of the text is:
"forward_inline_item": "Inline", "options_region_Australia": "Australia", "server_event_err_msg": "There was an error attempting to save", "Token": "Yes", "family": "Family","pwd_login_tab": "Enter Your... (1 Reply)
Hi Sorry to multipost. I am opening the new thread because the earlier threads head was misleading to my current doubt.
and i am stuck.
list=`cat /u/Test/programs`;
psg "ServTest" | awk -v listawk=$list '{
cmd_name=($5 ~ /^/)? $9:$8
for(pgmname in listawk)
... (6 Replies)
Hi, all
I have a file containing the following data:
name: PRODUCT_1
date: 2010-01-07
really_long_name: PRODUCT_ABCDEFG
I want to get the date (it is "2010-01-07" here), I could use the following code to do that:
awk... (6 Replies)
Hi All,
I am using the awk command to replace ',' by '\t' (tabs) in a csv file. I would like to apply this to all .csv files in a directory and create .txt files with the tabs.
How would I do this in a script?
I have the following script called "csvtabs":
awk 'BEGIN {
FS... (4 Replies)
Hi,
I am working with CVS log data and have some data as follows.
RCS file: /cvsroot/eclipse/org.eclipse.debug.core/core/org/eclipse/debug/core/IBreakpointListener.java,v
head: 1.14
branch:
locks: strict
access list:
keyword substitution: o
total revisions: 15; selected... (3 Replies)
Hello,
I have a file that I want to be able to insert a new line before every instance of a regex. I can get it to do this for each line that contains the regex, but not for each instance.
Contents of infile:
Test this 1...
Test this 2...
Test this 3... Test this 4... Test this... (2 Replies)
Hey, not too good at this, so I only managed a clumsy and SLOW solution to my problem that needs a drastic speed up. Any ideas how I write the following in awk only?
Code is supposed to do...
For every line read column values $6, $7, $8 and do a calculation with the same column values of every... (6 Replies)
Hello,
I extracted a list of files in a directory with the command ls . However this is not my computer, so the ls functionality has been revamped so that it gives the filesizes in front like this :
This is the output of ls command : I stored the output in a file filelist
1.1M... (5 Replies)
I am trying to apply an awk action over multiple files in a directory. It is a simple action, I want to print out the 1st 2 columns (i.e. $1 and $2) in each tab-separated document and output the result in a new file *.pp
This is the awk that I have come up with so far, which is not giving me a... (6 Replies)
Discussion started by: owwow14
6 Replies
LEARN ABOUT MOJAVE
moosex::singleton
MooseX::Singleton(3) User Contributed Perl Documentation MooseX::Singleton(3)NAME
MooseX::Singleton - turn your Moose class into a singleton
VERSION
version 0.29
SYNOPSIS
package MyApp;
use MooseX::Singleton;
has env => (
is => 'rw',
isa => 'HashRef[Str]',
default => sub { \%ENV },
);
package main;
delete MyApp->env->{PATH};
my $instance = MyApp->instance;
my $same = MyApp->instance;
DESCRIPTION
A singleton is a class that has only one instance in an application. "MooseX::Singleton" lets you easily upgrade (or downgrade, as it
were) your Moose class to a singleton.
All you should need to do to transform your class is to change "use Moose" to "use MooseX::Singleton". This module uses metaclass roles to
do its magic, so it should cooperate with most other "MooseX" modules.
METHODS
A singleton class will have the following additional methods:
Singleton->instance
This returns the singleton instance for the given package. This method does not accept any arguments. If the instance does not yet exist,
it is created with its defaults values. This means that if your singleton requires arguments, calling "instance" will die if the object has
not already been initialized.
Singleton->initialize(%args)
This method can be called only once per class. It explicitly initializes the singleton object with the given arguments.
Singleton->_clear_instance
This clears the existing singleton instance for the class. Obviously, this is meant for use only inside the class itself.
Singleton->new
This method currently works like a hybrid of "initialize" and "instance". However, calling "new" directly will probably be deprecated in a
future release. Instead, call "initialize" or "instance" as appropriate.
BUGS
Please report any bugs or feature requests to "bug-moosex-singleton@rt.cpan.org", or through the web interface at <http://rt.cpan.org>. We
will be notified, and then you'll automatically be notified of progress on your bug as we make changes.
SOME CODE STOLEN FROM
Anders Nor Berle <debolaz@gmail.com>
AND PATCHES FROM
Ricardo SIGNES <rjbs@cpan.org>
AUTHOR
Shawn M Moore <sartak@gmail.com>
COPYRIGHT AND LICENSE
This software is copyright (c) 2011 by Shawn M Moore.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.
perl v5.18.2 2011-12-08 MooseX::Singleton(3)