01-09-2008
I can't make the regexp code behave as anticipated, thus the workaround.
Worse, the string match code seems fundamentally unhappy with brackets.
I'd approach comp.lang.tcl with this issue and/or check out the tclers wiki and
see if any articles are on point.
The Tcler's Wiki
The lsearch idea is a okay but forces an abstraction from one
implicit type to another without solving the underlying problem and
possibly causing others...
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
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
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
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
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
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
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
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
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
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
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
LEARN ABOUT DEBIAN
wiki-toolkit-setupdb
WIKI-TOOLKIT-SETUPDB(1p) User Contributed Perl Documentation WIKI-TOOLKIT-SETUPDB(1p)
NAME
wiki-toolkit-setupdb - Set up a database storage backend for Wiki::Toolkit.
SYNOPSIS
# Set up or update the storage backend, leaving any existing data
# intact. Useful for upgrading from old versions of Wiki::Toolkit to
# newer ones with more backend features.
wiki-toolkit-setupdb --type postgres
--name mywiki
--user wiki
--pass wiki
--host 'db.example.com'
# Clear out any existing data and set up a fresh backend from scratch.
wiki-toolkit-setupdb --type postgres
--name mywiki
--user wiki
--pass wiki
--force-preclear
DESCRIPTION
Takes three mandatory arguments:
type
The database type. Should be one of 'postgres', 'mysql' and 'sqlite'.
name
The database name.
user
The user that connects to the database. It must have permission to create and drop tables in the database.
two optional arguments:
pass
The user's database password.
host
The hostname of the machine the database server is running on (omit for local databases).
and one optional flag:
force-preclear
By default, this script will leave any existing data alone. To force that to be cleared out first, pass the "--force-preclear" flag.
AUTHOR
Kake Pugh (kake@earth.li).
COPYRIGHT
Copyright (C) 2002-2003 Kake Pugh. All Rights Reserved.
Copyright (C) 2006 the Wiki::Toolkit team. All Rights Reserved.
This code is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Wiki::Toolkit
perl v5.14.2 2011-09-25 WIKI-TOOLKIT-SETUPDB(1p)