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 must have one of the values below: MATCHING STYLE OPTIONS If all matching style options are omitted, the default matching style is -glob. If more than one matching style is specified, the last matching style given takes precedence. -exact Pattern is a literal string that is compared for exact equality against each list element. -glob Pattern is a glob-style pattern which is matched against each list element using the same rules as the string match command. -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 are specified. GENERAL MODIFIER OPTIONS These options may be given with all matching styles. -all Changes the result to be the list of all matching indices (or all matching values if -inline is specified as well.) If indices are returned, the indices will be in numeric order. If values are returned, the order of the values will be the order of those values within the input list. -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. -not This negates the sense of the match, returning the index of the first non-matching value in the list. -start index The list is searched starting at position index. The interpretation of the index value is the same as for the command string index, | supporting simple index arithmetic and indices relative to the end of the list. CONTENTS DESCRIPTION OPTIONS These options describe how to interpret the items in the list being searched. They are only meaningful when used with the -exact and -sorted options. If more than one is specified, the last one takes precedence. The default is -ascii. -ascii The list elements are to be examined as Unicode strings (the name is for backward-compatibility reasons.) -dictionary The list elements are to be compared using dictionary-style comparisons (see lsort for a fuller description). Note that this only makes a meaningful difference from the -ascii option when the -sorted option is given, because values are only dictionary-equal when exactly equal. -integer The list elements are to be compared as integers. | -nocase | Causes comparisons to be handled in a case-insensitive manner. Has no effect if combined with the -dictionary, -integer, or -real | options. -real The list elements are to be compared as floating-point values. SORTED LIST OPTIONS These options (only meaningful with the -sorted option) specify how the list is sorted. If more than one is given, the last one takes precedence. The default option is -increasing. -decreasing The list elements are sorted in decreasing order. This option is only meaningful when used with -sorted. -increasing The list elements are sorted in increasing order. This option is only meaningful when used with -sorted. NESTED LIST OPTIONS These options are used to search lists of lists. They may be used with any other options. | -index indexList | This option is designed for use when searching within nested lists. The indexList argument gives a path of indices (much as might | be used with the lindex or lset commands) within each element to allow the location of the term being matched against. | -subindices | If this option is given, the index result from this command (or every index result when -all is also specified) will be a complete | path (suitable for use with lindex or lset) within the overall list to the term found. This option has no effect unless the -index | is also specified, and is just a convenience short-cut. EXAMPLES
Basic searching: lsearch {a b c d e} c -> 2 lsearch -all {a b c a b c} c -> 2 5 Using lsearch to filter lists: 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 This can even do a "set-like" removal operation: lsearch -all -inline -not -exact {a b c a d e a f g a} a -> b c d e f g Searching may start part-way through the list: lsearch -start 3 {a b c a b c} c -> 5 It is also possible to search inside elements: lsearch -index 1 -all -inline {{a abc} {b bcd} {c cde}} *bc* -> {a abc} {b bcd} SEE ALSO
foreach(n), list(n), lappend(n), lindex(n), linsert(n), llength(n), lset(n), lsort(n), lrange(n), lreplace(n), string(n) | KEYWORDS
list, match, pattern, regular expression, search, string Tcl 8.5 lsearch(n)
All times are GMT -4. The time now is 12:38 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy