01-22-2009
try this:
$col_strings="string_nm =' 12th dec, 1984, 'op=1 ' , s: 'g' ', name= ' Brian Hogg' , class = '1st, A.C: Field Pt. 0.1 ' ";
print "Before substitution-> $col_strings \n";
$col_strings =~ s/('[ ]*),([ ]*[a-zA-Z0-9\-_]+[ ]*=)/$1:$2/g;
print "After substitution-> $col_strings \n"; # Getting Wrong o/p
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
pattern match and substitution, can you help?
file named test.txt
I want to replace all the words Event with the word Fatal in all lines containing the word ERR - but I also want to keep the output of the other lines not matching ERR
Test.txt:
Event 13 INF egegegege
Event 14 INF... (4 Replies)
Discussion started by: frustrated1
4 Replies
2. Shell Programming and Scripting
suppose u have a file
ABC CDF ADF FDG HAA AHH AHA
so output shud be like
"ABC" "CDF" "ADF" FDG " "HAA" "AHH" "AHA" (8 Replies)
Discussion started by: cdfd123
8 Replies
3. Shell Programming and Scripting
Hi,
How to find out the words starting with ABC in a file (K shell)
I dont want the word having ABC in middle of any string.
Thanks
Subrat (1 Reply)
Discussion started by: subrat
1 Replies
4. Shell Programming and Scripting
Hi,
I have a template file and want to replace 3 parameters to the values that I want. these values are in a parameter file.
Any idea how to do this in perl?
the parameter file looks like:
host_name = jupiter
PORT = 1562
IPADDRESS = 10.1.34.10
the template file has lots of entry.... (1 Reply)
Discussion started by: melanie_pfefer
1 Replies
5. Shell Programming and Scripting
Hi Friends
I have one shell script abc.sh
If I run it ./abc.sh and . abc.sh , then what is the difference..
Thanks
Joy:confused: (1 Reply)
Discussion started by: itsjoy2u
1 Replies
6. Shell Programming and Scripting
Am trying to remove urls from text strings in PERL. I have the following but it does not seem to work:
$remarks =~ s/www\.\s+\.com//gi;
In English, I want to look for www. then I want to delete the www. and everything after it until I hit a space (but not including the space).
It's not... (2 Replies)
Discussion started by: mrealty
2 Replies
7. Shell Programming and Scripting
I am trying to write a if statement in KSH that if a string is start with abc then print something, I have written some code as below but it doesn't work.
Could someone please help me
if ]
then
print success
fi (5 Replies)
Discussion started by: yhever
5 Replies
8. Shell Programming and Scripting
Hi Everyone,
cat 1.txt
a <abc
b vfff
c 000>
d 4444
the output is:
<abcvfff000>
by using perl or awk, can get the value betwee "<abc" and ">", assume 1.txt has lots of those tags, so the output can filter out all those values.
Please advice.
Thanks (4 Replies)
Discussion started by: jimmy_y
4 Replies
9. Shell Programming and Scripting
I have two variables,
my $filename = "abc_yyyy_mm_dd.txt";
my $filename1 = " abc_2011_11_07.txt";
I need to perform some operations after checking if $filename has $filename1 in it
i have used the below code,
if($filename =~ /^$filename1/)
{
----
--
} (2 Replies)
Discussion started by: irudayaraj
2 Replies
10. UNIX for Dummies Questions & Answers
Hi there,
I have a file that goes like this:
b_cdbc_db_cd_bcd_aaa-bcd_cd
That type of format, for many lines.
What I want to do is enter a new line character for after the _
I write an expression to find "_...-" fine, but I don't know how to substitute this to be:
"_\naaa-" - where... (1 Reply)
Discussion started by: maximus73
1 Replies
LEARN ABOUT CENTOS
tcl_substobj
Tcl_SubstObj(3) Tcl Library Procedures Tcl_SubstObj(3)
__________________________________________________________________________________________________________________________________________________
NAME
Tcl_SubstObj - perform substitutions on Tcl objects
SYNOPSIS
#include <tcl.h>
Tcl_Obj *
Tcl_SubstObj(interp, objPtr, flags)
ARGUMENTS
Tcl_Interp *interp (in) Interpreter in which to execute Tcl scripts and lookup variables. If an error occurs, the interpreter's
result is modified to hold an error message.
Tcl_Obj *objPtr (in) A Tcl object containing the string to perform substitutions on.
int flags (in) ORed combination of flag bits that specify which substitutions to perform. The flags TCL_SUBST_COM-
MANDS, TCL_SUBST_VARIABLES and TCL_SUBST_BACKSLASHES are currently supported, and TCL_SUBST_ALL is pro-
vided as a convenience for the common case where all substitutions are desired.
_________________________________________________________________
DESCRIPTION
The Tcl_SubstObj function is used to perform substitutions on strings in the fashion of the subst command. It gets the value of the string
contained in objPtr and scans it, copying characters and performing the chosen substitutions as it goes to an output object which is
returned as the result of the function. In the event of an error occurring during the execution of a command or variable substitution, the
function returns NULL and an error message is left in interp's result.
Three kinds of substitutions are supported. When the TCL_SUBST_BACKSLASHES bit is set in flags, sequences that look like backslash substi-
tutions for Tcl commands are replaced by their corresponding character.
When the TCL_SUBST_VARIABLES bit is set in flags, sequences that look like variable substitutions for Tcl commands are replaced by the con-
tents of the named variable.
When the TCL_SUBST_COMMANDS bit is set in flags, sequences that look like command substitutions for Tcl commands are replaced by the result
of evaluating that script. Where an uncaught "continue exception" occurs during the evaluation of a command substitution, an empty string
is substituted for the command. Where an uncaught "break exception" occurs during the evaluation of a command substitution, the result of
the whole substitution on objPtr will be truncated at the point immediately before the start of the command substitution, and no characters
will be added to the result or substitutions performed after that point.
SEE ALSO
subst(n)
KEYWORDS
backslash substitution, command substitution, variable substitution
Tcl 8.4 Tcl_SubstObj(3)