Answer Posted / arun janardhanan

Simple guys here we go :-).........


#!/usr/bin/perl -w

use strict;
my($test,$number) = ("","");
$test = "12344tyyyyy456";
$number = ($test =~ tr/[0-9]/[0-9]/);
print "Number of digits in variable is :- $number ";
exit;

Mention the difference between die and exit in Perl?

1127

---

How to remove a directory in perl?

1003

---

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.

2062

---

What are scalars in perl?

967

---

How interpreter is used in perl?

958

---

How do I read command-line arguments with Perl?

1027

---

Explain tk?

999

---

How do I replace every character in a file with a comma?

996

---

What interface used in PERL to connect to database? How do you connect to database in Perl?

995

---

Explain substr function in perl?

1039

---

What is v-strings?

1075

---

what is the main function of fork() in cgi programming?

1142

---

Which functions in perl allows you to include a module file. State their differences.

961

---

Write a program that shows the distinction between child and parent process?

944

---

Why Perl aliases are considered to be faster than references?

953

---