MyCity » Ostali programski jezici -> Perl » Perl vs PHP

Perl vs PHP

Napisano na dan: 16.3.2008

Perl vs PHP
Sledeća strana Pagination

Idi na vrh

Poslao: 16 Mar 2008 14:52
Idi na vrh
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.

MyCity » Ostali programski jezici -> Perl » Perl vs PHP

Ko je trenutno na forumu
 

Ukupno su 1158 korisnika na forumu :: 65 registrovanih, 10 sakrivenih i 1083 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: 357magnum, Ageofloneliness, aleph_one, Alexa77, Black Luster Soldier, Bobrock1, bojan_t, Boris90, boro975, boromir, cifra, cvrle312, darkkran, darkojovxp, del boy, Denaya, dj.ape, Dogma21, Dorcolac, Drugsparrow, dusanobr, EXIT78, famoso, FOX, Georgius, Glavni Oružni, GveX, Haris, havoc995, HrcAk47, interesujeme, Ir, istina, ivan979, kaskadija, kojotuzamku, kokodakalo, Kubovac, Kvazar, lcc, Litostroton, Lotus, madun123, Mercury, Mi lao shu, morava_01, Murko, niksa517, Novakomp, oldtimer, PlayerOne, precan, PrincipL, rakivan, raster12, RJ, Sarmat, Shadow soldier, Sir Budimir, Srki94, ujke, Vlada78, Vrač, W123, Zoca