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 2030 korisnika na forumu :: 82 registrovanih, 6 sakrivenih i 1942 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 6018 - dana 19 Dec 2025 13:41

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 10x10.9, A.R.Chafee.Jr., Apis Dr, Apok, awathorn, Azzo, bbelic, Betta, bokicacar, Botovac, Cicumile, Citalac, crazydkure, Darkoniii_94, dekan.m, Despot Đurađ, Despot1, Dioniss, divison, Dogma21, doragan, Draganeli, drgrozozo, dukajov, Dzoni70, Feller, FileFinder, goxin, Great White, Hans Gajger, igorkozar83, ikan, indja, Ivoo, Jan, Jezekijel, Kajzer Soze, kila33, kolateralnasteta, kolle.the.kid, leopard83, ljuba.b, Lošmi, M74AB3, Macalone, Masan, Matija, MB120mm, milanovic, Milometer, Misterrno, Mrav Obrad, MrNo, Niki2024, nikonema, Nomica, nuki1234, Paklenica, Pale2025, Papadubi, peradetlić, Pero, Perudin_92, Podljub, Prečanin30, proka89, raptorsi, sales, sasa87, sekretar, Sirius, Smiljkovich, stegonosa, Tanasko95, Uros Cuore Sportivo, Vanderx, vathra, vlad4, VNVK, Wehicle, zmajbre, 79693