Breaking News: Grepper is joining You.com. Read the official announcement!

How count word in perl

Zio Paperone answered on January 19, 2023 Popularity 1/10 Helpfulness 1/10

answer How count word in perl

How count word in perl

Comment

my $text = 'asdf asdf asdf asdf asdf';

sub count_array {
   my @text_words = split(/\s+/, $text);
   scalar(@text_words);
}

sub count_list {
   my $x =()= $text =~ /\S+/g;       #/
}

sub count_while {
   my $num; 
   $num++ while $text =~ /\S+/g;     #/Finché risulta una match nella riga rimane nel while
   $num
}

sub count_tr {
    1 + ($text =~ tr{ }{ });
}

say count_array; # 5
say count_list;  # 5
say count_while; # 5
say count_tr; # 5

Popularity 1/10 Helpfulness 1/10 Language python

Source: Grepper

Tags: count perl python word

Link to this answer
Share Copy Link

Contributed on Jan 19 2023

Zio Paperone

0 Answers Avg Quality 2/10

Continue with Google

By continuing, I agree that I have read and agree to Greppers's Terms of Service and Privacy Policy.

How count word in perl

Contents

More Related Answers

How count word in perl

Grepper

Documentation

Social

Legal

Contact

Oops, You will need to install Grepper and log-in to perform this action.