Help for this page

Select Code to Download

Select or download this
```
my $cnt = @{[$str =~ /./sg]};
```
Select or download this
```
my $cnt =()= $str =~ /./sg;
```