Answer Posted / perllearner

my %hshUniq;

my $testString = "This is the programme to check the count of unique values present in this text This is the programme to check";
my @arrList = split (" ",$testString);

foreach (@arrList);
{
chomp($_);
if ( exist %hshUniq{$_})
{
my $count = $hshUniq{$_};
$hshUniq{$_} = $count++;
}else
{
$hshUniq{$_} = 1;
}
}

while (($key,$value) = each(%hshUniq))
{
print "The unique character $key count in the string is $value
";
}

What are the different string manipulation operators in perl?

864

---

What is -> symbol in perl?

955

---

Write a program to decode the data in the form using cgi programming

983

---

List the prefix dereferencer in Perl.

877

---

Explain goto label?

865

---

What does cgi program store?

850

---

How to concatenate strings with perl?

797

---

How can you define “my” variables scope in Perl and how it is different from “local” variable scope?

1043

---

What can be done for efficient parameter passing in perl? Explain.

957

---

Comment on data types and variables in perl.

873

---

How do I sort a hash by the hash key?

870

---

how to get back up from private character editor which is saved in the format of .udf

2241

---

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

923

---

How to add elements in a hash in perl?

853

---

Explain socket programming in perl?

856

---