Re^2: Counting number of characters in a string

$cnt = @{[$str =~ /(\.)/g]};
[download]

Comment on Re^2: Counting number of characters in a string Download Code

Replies are listed 'Best First'.
Re^3: Counting number of characters in a string by toolic (Bishop) on Jan 23, 2009 at 22:00 UTC
This does not work for me. I expect the length of the string 'abc' to be 3, but your code returns 0: `use strict; use warnings; my $str = 'abc'; my $cnt = @{[$str =~ /(\.)/g]}; print "$cnt\n"; __END__ 0` [download]	[reply] [d/l]
Re^4: Counting number of characters in a string by ikegami (Patriarch) on Jan 23, 2009 at 22:34 UTC
Remove the backslash, add the "s" modifier. And the parens aren't necessary. `my $cnt = @{[$str =~ /./sg]};` [download] Cheaper alternative: `my $cnt =()= $str =~ /./sg;` [download]	[reply] [d/l] [select]
Re^4: Counting number of characters in a string by levonbarker (Initiate) on Dec 30, 2010 at 17:09 UTC
Use the length() function.	[reply]