Perl vs PHP

Perl vs PHP

offline
  • igor86  Male
  • Stručni saradnik
    Web programiranje
  • Pridružio: 24 Maj 2006
  • Poruke: 1633

Uzmem da prebrojim domaine u mailovima, reko bar ce imati bolje rezultate od php, kad ono nista, php ga duplo uzeo.

perl
if( open ( DAT, "Emails2.txt" ))    while (<DAT>){       @Array = split(/,/, $_);       ($Name, $Domain) = split( /@/, @$Array[0] );       $Data{ $Domain }++;     }

php
if( $Fp = fopen( 'Emails2.txt', 'r' ) )       while( !feof( $Fp )){          $Array = explode(',', fgets($Fp));          list($Name, $Domain) = explode( '@', $Array[0] );          $Data[ $Domain ]++;       }



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Ko je trenutno na forumu
 

Ukupno su 1042 korisnika na forumu :: 32 registrovanih, 3 sakrivenih i 1007 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 3466 - dana 01 Jun 2021 17:07

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: ajo baba, anta, bojan_t, Brana01, branko7, cavatina, cikadeda, dekan.m, Denaya, Djokkinen, djordjekec, gomago, hyla, Komentator, kunktator, kuntalo, ladro, Lister, mackenzie, mean_machine, milenko crazy north, MiroslavD, nebidrag, nedeljkovici, novator, radionica1, strelac07, Tas011, vaso1, YugoSlav, šumar bk2, 2001