»» # g-Modifier und Listenkontext
my @anz = ( $text =~ /C/g );
Geht auch kürzer und spart das Hochzählen:
~~~perl
my $anz = my @anz = ( $text =~ /C/g );
print 'C ', $anz, ' mal gefunden';
Oder habe ich dich falsch verstanden?
Siechfred
--
Ein Selbständiger ist jemand, der bereit ist, 16 Stunden am Tag zu arbeiten, nur um nicht 8 Stunden für einen Anderen arbeiten zu müssen.
Ein Selbständiger ist jemand, der bereit ist, 16 Stunden am Tag zu arbeiten, nur um nicht 8 Stunden für einen Anderen arbeiten zu müssen.