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 851 korisnika na forumu :: 41 registrovanih, 10 sakrivenih 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: A.R.Chafee.Jr., awathorn, bato, celik, cikadeda, Ctrl x, Cufo, darkangel, DARKMEN22, DENIRO, djboj, doktor1964, dragon986, Georgius, goxin, Haryy, Hoegaarden, HrcAk47, krlebgd77, kuntalo, Lucije Kvint, MILO-VAN, milos.cbr, misa1xx, misa2, Misirac, ostoja, Panonsky, Rabit, rovac, Snorks, Sr.Stat., ssekir75, Vlada78, vladancekicsrb, vlahale, voja64, wizzardone, xJeremijAx, zeljkodjokovic, |_MeD_|