Sponsored Content
Top Forums Shell Programming and Scripting tcl: regexp matching special character Post 302156943 by sumitgarg on Wednesday 9th of January 2008 04:28:21 PM
Old 01-09-2008
i would rather use lsearch

i was trying to understand if (and how) that can be done with 'regexp'?

Otherwise,

lsearch -exact $str1 $var1

does the job pretty well.

% set var1 {a[1]}
a[1]
% set var2 {aa[1]}
aa[1]
% set var3 {a[11]}
a[11]
% set str1 {a[1] is the element we are looking for and not aa[1] or a[11]}
a[1] is the element we are looking for and not aa[1] or a[11]

% lsearch -exact $str1 $var1
0
% lsearch -exact $str1 $var2
10
% lsearch -exact $str1 $var3
12
 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

pattern matching on any special character in Unix

Hi, I have field in a file which would come with any special character, how do i check that field? Eg: @123TYtaasa>>>/ 131dfetr_~2 In the above example, how do I add pattern for any special character on the keyboard. Thanks (3 Replies)
Discussion started by: techmoris
3 Replies

2. Shell Programming and Scripting

perl regexp matching

Hello, I cannot see what's wrong in my code. When I run code below, it just print an empty string. my $test = "SWER~~ERTGSDFGTHAS_RTAWGA_DFAS.x4-234253454.in"; if ($test = ~ m/\~{1,2}.*4/) { print "$1\n"; } else { print "No match...\n"; } Anyone know what I'm doing wrong? ... (4 Replies)
Discussion started by: urandom
4 Replies

3. Shell Programming and Scripting

matching regexp

Hi, maybe it is stupid question, but is it possible to match expression like this ? : ... // ... ( there is "//" somewhere on the line and on the end of the line there ISN'T "*/" ) I've tried something like : (in SED) sed 's/\/\/' but I need "*/" not to be on the end of the line ...... (2 Replies)
Discussion started by: kolage
2 Replies

4. Shell Programming and Scripting

Question on TCL regexp and match

Hello everyone, I'm new in tcl scripting. I'm currently studying a tcl script and came across this line: regexp {(\d+)(\S?)} $opts match opt swi According to my understanding, this line means to search in the opts variable for one or more digit, followed by a non-whitespace character... (2 Replies)
Discussion started by: mar85
2 Replies

5. Shell Programming and Scripting

Question on regexp in TCL

I need some help with regexp in tcl. The following code does work if the $urlvar ends in jpg,jpeg,png or gif. Eg, protocol(http/https)://testsite.com/images/image1.jpg if { ! } { //Do something } My problem is that if the URL does not end in these extensions this regexp is of no... (1 Reply)
Discussion started by: ampak
1 Replies

6. Shell Programming and Scripting

Regexp in tcl

I need to change R3.1.5 as 03015 similarly R4.1.7 as 04017 i need a single command in tcl pls help ---------- Post updated at 05:19 PM ---------- Previous update was at 04:48 PM ---------- i had to do like this without using regexp set old_release "R3.1.5" ... (1 Reply)
Discussion started by: Syed Imran
1 Replies

7. Shell Programming and Scripting

Merging two special character separated files based on pattern matching

Hi. I have 2 files of below format. File1 AA~1~STEVE~3.1~4.1~5.1 AA~2~DANIEL~3.2~4.2~5.2 BB~3~STEVE~3.3~4.3~5.3 BB~4~TIM~3.4~4.4~5.4 File 2 AA~STEVE~AA STEVE WORKS at AUTO COMPANY AA~DANIEL~AA DANIEL IS A ELECTRICIAN BB~STEVE~BB STEVE IS A COOK I want to match 1st and 3rd... (2 Replies)
Discussion started by: crypto87
2 Replies

8. Shell Programming and Scripting

Help using regexp in a TCL script ??

In a tcl script I need to find a way of reading a file, and looking for a phrase ("set myvariable") and putting the word following that into a variable. I've used a file open, and a while loop with gets to read each line from the file into a variable, and using regexp searched for the item. I'm... (1 Reply)
Discussion started by: Tonyb61
1 Replies

9. Shell Programming and Scripting

Special Character issue in Expect Utility (Tcl)

Hi, I have written a unix expect utility "ssh-login.exp" which connects (ssh) to remote host and execute some shell script. I am calling this "ssh-login.exp" utility from another shell script. "ssh-login.exp" takes username, password, host and shell script path to execute on remote host. All... (1 Reply)
Discussion started by: Mahesh Desai
1 Replies

10. UNIX for Beginners Questions & Answers

TCL script to delete a pattern(regexp)

Hi I am writing a TCL script to delete a certain in a file My Input file module bist_logic_inst(a, ab , dhd, dhdh , djdj, hdh, djjd, jdj, dhd, dhp, dk ); input a; input ab; input dhd; input djdj; input dhd; output hdh; output djjd; output jdj; output dk; (1 Reply)
Discussion started by: kshitij
1 Replies
lsearch(n)						       Tcl Built-In Commands							lsearch(n)

__________________________________________________________________________________________________________________________________________________

NAME
lsearch - See if a list contains a particular element SYNOPSIS
lsearch ?options? list pattern _________________________________________________________________ DESCRIPTION
This command searches the elements of list to see if one of them matches pattern. If so, the command returns the index of the first match- ing element (unless the options -all or -inline are specified.) If not, the command returns -1. The option arguments indicates how the | elements of the list are to be matched against pattern and it must have one of the following values: -all Changes the result to be the list of all matching indices (or all matching values if -inline is specified as well.) | -ascii The list elements are to be examined as Unicode strings (the name is for backward-compatability reasons.) This option is only mean- ingful when used with -exact or -sorted. -decreasing The list elements are sorted in decreasing order. This option is only meaningful when used with -sorted. -dictionary The list elements are to be compared using dictionary-style comparisons. This option is only meaningful when used with -exact or -sorted. -exact The list element must contain exactly the same string as pattern. -glob Pattern is a glob-style pattern which is matched against each list element using the same rules as the string match command. -increasing The list elements are sorted in increasing order. This option is only meaningful when used with -sorted. -inline The matching value is returned instead of its index (or an empty string if no value matches.) If -all is also specified, then the | result of the command is the list of all values that matched. -integer The list elements are to be compared as integers. This option is only meaningful when used with -exact or -sorted. -not This negates the sense of the match, returning the index of the first non-matching value in the list. | -real The list elements are to be compared as floating-point values. This option is only meaningful when used with -exact or -sorted. -regexp Pattern is treated as a regular expression and matched against each list element using the rules described in the re_syntax refer- ence page. -sorted The list elements are in sorted order. If this option is specified, lsearch will use a more efficient searching algorithm to search list. If no other options are specified, list is assumed to be sorted in increasing order, and to contain ASCII strings. This option is mutually exclusive with -glob and -regexp, and is treated exactly like -exact when either -all, or -not is specified. -start index The list is searched starting at position index. If index has the value end, it refers to the last element in the list, and | end-integer refers to the last element in the list minus the specified integer offset. If option is omitted then it defaults to -glob. If more than one of -exact, -glob, -regexp, and -sorted is specified, whichever option is specified last takes precedence. If more than one of -ascii, -dictionary, -integer and -real is specified, the option specified last takes precedence. If more than one of -increasing and -decreasing is specified, the option specified last takes precedence. EXAMPLES
| lsearch {a b c d e} c => 2 | lsearch -all {a b c a b c} c => 2 5 | lsearch -inline {a20 b35 c47} b* => b35 | lsearch -inline -not {a20 b35 c47} b* => a20 | lsearch -all -inline -not {a20 b35 c47} b* => a20 c47 | lsearch -all -not {a20 b35 c47} b* => 0 2 | lsearch -start 3 {a b c a b c} c => 5 | SEE ALSO
foreach(n), list(n), lappend(n), lindex(n), linsert(n), llength(n), lset(n), lsort(n), lrange(n), lreplace(n) | KEYWORDS
list, match, pattern, regular expression, search, string Tcl 8.4 lsearch(n)
All times are GMT -4. The time now is 06:22 PM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy