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 1110 korisnika na forumu :: 43 registrovanih, 8 sakrivenih i 1059 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: Apok, atmel, babaroga, BORUTUS, darkojbn, Djokislav, DonRumataEstorski, elenemste, FileFinder, FOX, gomago, Insan, kalens021, Karla, kihot, Koridor 11, Kubovac, kunktator, ladro, Lubica, Marko Marković, MiG-29M2, milutin134, Mixelotti, Neutral-M, Nikolaa11, nuke92, Panter, panzerwaffe, pein, procesor, RJ, Rogan33, ruma, sasa87, Smiljke, Srle993, stalja, Steeeefan, TheBeastOfMG, theNedjeljko, YU-UKI, Zimbabwe