Hi guyz,
suppose there is a variable a=sachin.
I want to have letter 'c' from variable a.
I am trying this awk 'substr(sachin,2,1)'
but its not working.
I cant user cut as it requires a file whereas i have a variable. (4 Replies)
I'm new to shell scripting, and need to add a series of commands to the ends of certain lines of text that contain a keyword. Any easy way to do this? Thanks (2 Replies)
hello
i have a file (myfile) contains line as follows
/home/mytarget/myproject
i want to add a pattern at the end of this line.
my pattern is- /.*mk
i want like it - /home/mytarget/myproject/*.mk
i tried sed like
sed 's/$//*.mk/' myfile > newfilename, but not wrking.
pls... (2 Replies)
Dear friends,
I am facing a problem with a flat file, to solve that file i need to add certain character in the file which I am not able to do because of "$" sign in the pattern.
Situation is as follows.
Flat file has word RMM$CART
I want to reple this word by RMM$CART DFD
The dollar "$"... (5 Replies)
I need to add a word from file1 to file2 accordinggly... file1 contains name of servers and file2 version of server
I need that information in a single file so that the format is
server_name : version
I been trying but havent been able to figure out how to search for a file using sed...
... (14 Replies)
Hello,
I have a list:
i.e:
40331786
50331787
30331788
30331789
30331790
50331791
50331792
50331793
70331794
70331795
70331796
...
...
and I need to add text before and after each number: (2 Replies)
I have a file input.txt which have loads of weird characters, html tags and useful materials. I want to display 35 characters after the word description excluding weird characters like $$#$#@$#@***$# and without html tags in the new file output.txt. Help me. Thanx in advance.
My final goal is to... (11 Replies)
I have a file input.txt which have loads of weird characters, html tags and useful materials. I want to display 35 characters after the word "description" excluding weird characters like $&lmp and without html tags in the new file output.txt. Help me. Thanx in advance. I have attached the input... (4 Replies)
Hi,
var=QSB SBD SDN SGJ SJP SKB SKD SLP SML SNB SRE SRG STP TAJ UMP UNO VKS VND VNS WAH ZRR
I have to put *.sql after every word
What I did
echo $var>/root/file1.sql
sed -i 's/ /*.sql /g' file1.sql
cat file1.sql
Output
QSB*.sql SBD*.sql SDN*.sql SGJ*.sql SJP*.sql SKB*.sql... (9 Replies)
Perl::Critic::Policy::ControlStructures::ProhibitUnreachUserCContributed Perl DPerl::Critic::Policy::ControlStructures::ProhibitUnreachableCode(3)NAME
Perl::Critic::Policy::ControlStructures::ProhibitUnreachableCode - Don't write code after an unconditional "die, exit, or next".
AFFILIATION
This Policy is part of the core Perl::Critic distribution.
DESCRIPTION
This policy prohibits code following a statement which unconditionally alters the program flow. This includes calls to "exit", "die",
"return", "next", "last" and "goto". Due to common usage, "croak" and "confess" from Carp are also included.
Code is reachable if any of the following conditions are true:
o Flow-altering statement has a conditional attached to it
o Statement is on the right side of an operator "&&", "||", "//", "and", "or", or "err".
o Code is prefixed with a label (can potentially be reached via "goto")
o Code is a subroutine
EXAMPLES
# not ok
exit;
print "123
";
# ok
exit if !$xyz;
print "123
";
# not ok
for ( 1 .. 10 ) {
next;
print 1;
}
# ok
for ( 1 .. 10 ) {
next if $_ == 5;
print 1;
}
# not ok
sub foo {
my $bar = shift;
return;
print 1;
}
# ok
sub foo {
my $bar = shift;
return if $bar->baz();
print 1;
}
# not ok
die;
print "123
";
# ok
die;
LABEL: print "123
";
# not ok
croak;
do_something();
# ok
croak;
sub do_something {}
CONFIGURATION
This Policy is not configurable except for the standard options.
SEE ALSO
Perl::Critic::Policy::ControlStructures::ProhibitPostfixControls
AUTHOR
Peter Guzis <pguzis@cpan.org>
COPYRIGHT
Copyright (c) 2006-2011 Peter Guzis. All rights reserved.
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.3 2014-06-09 Perl::Critic::Policy::ControlStructures::ProhibitUnreachableCode(3)