Small changes! The cost of scanning for nr_cpus twice is offset by the simpler substitute -- 's/\(...\).../\1.../' is not so cheap:
Code:
/KDUMP_COMMANDLINE_APPEND.*nr_cpus/ {
h # hold original line
s/^/# / # Add comment
p # print commented line
g # retrieve original line
s/nr_cpus/maxcpus/ # change the text
}
Hi everyone,
I am attempting to do something that should be very simple. How do I replace a specific line of a file with different text, and then save that file to its original name? I believe I want to use the sed command with the c option, but I after trying many times, I can't get the right... (10 Replies)
Hi,
I'm struggling to write a script to do the following,
-will go through each line in the file
-in a specific character positions, changes
the value to a new value
-These character positions are fixed througout the file
-----------------------
e.g.: file1.sh will have the following 3... (4 Replies)
Suppose I have a file. The content of the file is:
Fwf33
#enable_a STH.
fwqfw
egvega
What I want to do is: if "STH" = "YES", do not change it, otherwise, change it to "YES". e.g.
if
“enable_a ERR”
change it to be
“enable_a YES”
if
“enable_a YES”
do not change the file.
... (2 Replies)
Hi,
i have a line
tftp dgram udp wait nobody /usr/sbin/tcpd in.tftpd /tftpboott
in /etc/inet.conf file. ineed to replace nobody with root and /tftpboott with /flx/boot. i tried using sed ,but i could not change both of them. can you please help me to do this.
Edit:... (7 Replies)
Let say in a file I have lines of data like this :
13;2073;461496;15075341;3;001f7d3a;2042063674;
13;2074;461446;15080241;6;001ed33a;2042020154;
13;2075;461401;15085270;6;001f593b;2042054459;
13;2076;461381;15087160;6;001f7483;2042061443;
13;2077;461419;15083419;6;001eca1a;2042017818;
I... (3 Replies)
Hi,
I'm working on a script to make automatic the new releases of my website...
However in this script I put all the css script in a single one. There's no rpoblem for that.
My problem is when I want to change the header of my layout page to put instead of :
$header.="<link rel=\"stylesheet\"... (2 Replies)
Hi,
I have a input files as below.
Sample of one input file
type mtg_key =
record
decimal("\344") id;
string("\344") ct_cd;
string("\344") st_cd;
end;
type psl_key =
record
decimal("\344") id;
utf8 string("\344") st_cd;
end;
type amk_fields =
record
... (6 Replies)
I need a script to take the filename of every file in a directory and substitute that file name for whatever is on the first line of the file. There may or may not be anything on the line, but I want the line to be the same as the file name. Most of the script tools I have used are non-destructuve,... (14 Replies)
I have a log file, which i have divided into 14 files using csplit, the file looks like below
test-000000
test-000001 #and so on until 14
now I want all the 14 files generated to be renamed as the some part of test in first line of the file how can i eliminate the unwanted text?
sample... (5 Replies)
Hi Gurus,
I have below file which has different sections, need to move the sections to beginning of the each record.
original file
aaa
bbb
ccc
ddd
eee
fff
output file.
aaa
bbb
ccc
ddd
eee
fff (6 Replies)
Discussion started by: green_k
6 Replies
LEARN ABOUT MOJAVE
ppi::token::comment
PPI::Token::Comment(3) User Contributed Perl Documentation PPI::Token::Comment(3)NAME
PPI::Token::Comment - A comment in Perl source code
INHERITANCE
PPI::Token::Comment
isa PPI::Token
isa PPI::Element
SYNOPSIS
# This is a PPI::Token::Comment
print "Hello World!"; # So it this
$string =~ s/ foo # This, unfortunately, is not :(
bar
/w;
DESCRIPTION
In PPI, comments are represented by "PPI::Token::Comment" objects.
These come in two flavours, line comment and inline comments.
A "line comment" is a comment that stands on its own line. These comments hold their own newline and whitespace (both leading and trailing)
as part of the one "PPI::Token::Comment" object.
An inline comment is a comment that appears after some code, and continues to the end of the line. This does not include whitespace, and
the terminating newlines is considered a separate PPI::Token::Whitespace token.
This is largely a convenience, simplifying a lot of normal code relating to the common things people do with comments.
Most commonly, it means when you "prune" or "delete" a comment, a line comment disappears taking the entire line with it, and an inline
comment is removed from the inside of the line, allowing the newline to drop back onto the end of the code, as you would expect.
It also means you can move comments around in blocks much more easily.
For now, this is a suitably handy way to do things. However, I do reserve the right to change my mind on this one if it gets dangerously
anachronistic somewhere down the line.
METHODS
Only very limited methods are available, beyond those provided by our parent PPI::Token and PPI::Element classes.
line
The "line" accessor returns true if the "PPI::Token::Comment" is a line comment, or false if it is an inline comment.
SUPPORT
See the support section in the main module.
AUTHOR
Adam Kennedy <adamk@cpan.org>
COPYRIGHT
Copyright 2001 - 2011 Adam Kennedy.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
perl v5.18.2 2011-02-25 PPI::Token::Comment(3)