|< 1 2 3 >| | 30 Einträge, 3 Seiten |
1
2
3
4
5
my $string = "abba";
my $substr_count = $string =~ y/a/a/;
#oder auch:
my $substr_count_2 = @{[$string =~ m/(a)/g)]};
my $substr_count_2 = scalar($string =~ m/(a)/g);
my $substr_count_2 = @{[$string =~ m/(a)/g]};
$count = () = $string =~ /\d+/g;
|< 1 2 3 >| | 30 Einträge, 3 Seiten |