Answer Posted / tclgeek

to find the count of no of digits using regular expression in TCL

set val "abbj68689kbj8798797"
set a [regexp {[a-z]+(\d+)[a-z]+(\d+)} $val val1 val2 val3]
if { $a == 1 } {
puts "matched pattern found are : $val2$val3"
puts "the number of digits are [expr [string length $val2] + [string length $val3]]"
} else {
puts "error"
}

What is the purpose of redo statement?

960

---

What is the difference between exec and system?

1027

---

What are scalar data and scalar variables?

1065

---

Write a program to download the contents from www.perlinterview.com/answers.php website in Perl.

862

---

what is the function that is used to identify how many characters are there in a string?

918

---

What does the qx{ } operator do?

866

---

What is the tk module?

918

---

How can the user execute a long command repeatedly without typing it again and again?

885

---

What are the logical operators used for small scale operations?

917

---

Explain use of ‘my’ keyword in perl?

896

---

What is an interpolation in perl?

943

---

how to create a flat file database as shown below s.no name age city phone 0 hema 22 Calcutta 4312542 1 hema 21 Bangalore 2344345 2 ganesh 25 delhi 2445454 3 kartik 45 pune 4312121 4 santosh 25 Hyderabad 2254231 5 kumar 25 mysore 2344567 6 gita 34 mangalore 6532123 7 gita 32 pune 2213456 Q1.print the details of the person who r from bangalore q2.Replace the city name managlore to pune q3.prints no of person having name gita and hema q4.print how many are of age 25.

2023

---

Elaborate on perl bite-wise operators.

857

---

How can I implement the function overloading in Perl ? I read about the operator overloading, I do not know how to implement the function overloading. Thanks in advance ?

2864

---

what are the two ways to get private values inside a subroutine or block?

889

---