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 813 korisnika na forumu :: 12 registrovanih, 1 sakriven i 800 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: aramis s, babaroga, Bubimir, cincarin, Dorcolac, ivan1973, JohnnyBoii, kolle.the.kid, lcc, ljuba, Metanoja, Ripanjac