Hello,
I need to insert a line (like a header) as the first line of a very huge file (about 3 ml rows). I am able to do it with sed, but redirecting the output and creating a new file takes quite some time. I was wondering if there was a more efficient way of doing it?
Any help would be... (3 Replies)
Hello all
im doing simple parsing on text file , but now I need to insert
string before the first line of the text file , how can I do that in perl? (3 Replies)
like i have file like
abc
123
pqr
bbbb
ttttttttt
t
tttt
------------------
i want to insert "class" after pqr and t lines
please suggest me. (4 Replies)
hello mighty all
there is a line of 50 words and i need to take a random number of words from the beginning (20 words for example) then put my word then add other 10 words from the continue then add another my special word then add 20 words till the end..
my own knowledge base can say it is... (12 Replies)
Hi, Perl is new to me. I am trying to insert a line to a file.
Example: I have a file (trial.txt), content:
ZZZZ
AAA
DDDD
I am trying to insert CCC below AAA.
MY perl command:
open (FILE,"+>>C:\\Documents and Settings\\trial.txt\n")|| die "can't open file";
while(<FILE>)
{ ... (6 Replies)
Hi,
I need to insert a new line containing the string "QUERY" above every 5 lines.
The below piece of code inserts a new line after every 5th line
awk '{print $0} !(NR%5) {print "QUERY"}'
sed 'n;n;n;n;G;' --> I do not know how to give "QUERY" string here
But I need to insert it before... (4 Replies)
Hello,
I am looking to automate a task - which is updating an existing access control instruction of a server and making sure that the attributes defined in the instruction is in sorted order. The instructions will be of a specific syntax.
For example lets assume below listed is one of an... (6 Replies)
Hello.
I have a config file (/etc/my_config_file) which may content :
#
# port for HTTP (descriptions, SOAP, media transfer) traffic
port=8200
# network interfaces to serve, comma delimited
network_interface=eth0
# set this to the directory you want scanned.
# * if have multiple... (6 Replies)
I have a test file that I want to read and insert only certain lines into the
the table based on a filter.
1. Rread the log file 12 Hours back Getdate() -12 Hours
2. Extract the following information on for lines that say "DUMP is
complete"
A. Date
B. Database Name
C.... (2 Replies)
Hi All,
I am using UNix Sun OS sun4u sparc SUNW,SPARC-Enterprise
My intention is to insert a line of text after 13th line of every file inside a particular directory.
While trying to do it for a single file , i am using sed
sed '3 i this is the 4th line' filename
sed: command garbled: 3... (5 Replies)
Perl::Critic::Policy::ValuesAndExpressions::ProhibitLongUsernContribPerl::Critic::Policy::ValuesAndExpressions::ProhibitLongChainsOfMethodCalls(3)NAME
Perl::Critic::Policy::ValuesAndExpressions::ProhibitLongChainsOfMethodCalls - Long chains of method calls indicate tightly coupled code.
AFFILIATION
This Policy is part of the core Perl::Critic distribution.
DESCRIPTION
A long chain of method calls usually indicates that the code knows too much about the interrelationships between objects. If the code is
able to directly navigate far down a network of objects, then when the network changes structure in the future, the code will need to be
modified to deal with the change. The code is too tightly coupled and is brittle.
$x = $y->a; #ok
$x = $y->a->b; #ok
$x = $y->a->b->c; #questionable, but allowed by default
$x = $y->a->b->c->d; #not ok
CONFIGURATION
This policy has one option: "max_chain_length" which controls how far the code is allowed to navigate. The default value is 3.
TO DO
Add a "class_method_exemptions" option to allow for things like
File::Find::Rule
->name('*.blah')
->not_name('thingy')
->readable()
->directory()
->in(@roots);
AUTHOR
Elliot Shank "<perl@galumph.com>"
COPYRIGHT
Copyright (c) 2007-2011 Elliot Shank.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. The full text of this license
can be found in the LICENSE file included with this module.
perl v5.16.3Perl::Critic::Policy::ValuesAndExpressions::ProhibitLongChainsOfMethodCalls(3)