Article View: pl.comp.lang.perl
Article #1125Re: Jak policzyc?
From: Piotr Piatkowski
Date: Mon, 16 Mar 1998 15:00
Date: Mon, 16 Mar 1998 15:00
22 lines
1302 bytes
1302 bytes
Adam Lesien <a.lesien@pbg.pl> wrote:
: Jak najlatwiej policzyc ilosc wystapien dowolnego
: lancucha $s1 w zmiennej tekstowej $s2 ???
Nie przychodzi mi do głowy nic innego, jak:
for( $n = 0; $s2 =~ /$s1/g; $n++ )
{ }
W pierwszej chwili pomyślałem o czymś takim jak:
$n = scalar( split $s1, $s2 );
ale tutaj wynik zależy od tego czy $s2 występuje na końcu i na
początku $s1.
A tak w ogóle, to nie wiem (ale można to sprawdzić w man perlop) jak
się zachowa pierwsze rozwiązanie gdy powtórzenia będą się nakładały.
--
Piotr Piątkowski, Uczelniane Centrum Informatyki, AGH Krakow, POLAND
Technical Details
Message-ID:
<6ejer1$rrd$1@galaxy.uci.agh.edu.pl>Path:
mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!news.memax.krakow.pl!news.wnaft.agh.edu.pl!agh.edu.pl!agh.edu.pl!not-for-mailReferences:
<350D0976.20AAFBDB@pbg.pl>Show Full Headers
Complete Article Headers
Path: mbox-mo1.pugleaf.net!news-archive.icm.edu.pl!pingwin.icm.edu.pl!news.icm.edu.pl!news.task.gda.pl!news.memax.krakow.pl!news.wnaft.agh.edu.pl!agh.edu.pl!agh.edu.pl!not-for-mail From: Piotr Piatkowski <kompas@galaxy.uci.agh.edu.pl> Newsgroups: pl.comp.lang.perl Subject: Re: Jak policzyc? Date: 16 Mar 1998 16:00:49 +0100 Organization: University of Mining & Metallurgy Lines: 22 Message-ID: <6ejer1$rrd$1@galaxy.uci.agh.edu.pl> References: <350D0976.20AAFBDB@pbg.pl> NNTP-Posting-Host: galaxy.uci.agh.edu.pl Mime-Version: 1.0 X-Newsreader: TIN [UNIX 1.3 unoff BETA 971018; sun4m SunOS 5.5.1] Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit