p5pRT
commented
15 years ago From slavon@bigtelecom.ru
Created by slavon@bigtelecom.ru
files to test BUG! Simple run test.pl and test.php and compare return! :)) It's was very hard to find this "magic" numbers :))) Ideas?
test.txt:
1.9
1.9
1.9
1.9
1.9
1.9
1.9
1.9
1.9
1.9
32.3
1.9
1.9
1.9
1.9
1.9
1.9
1.9
9.5
1.9
13.3
3.8
1.9
77.9
53.2
1.9
1.9
9.5
1.9
11.4
9.5
5.7
3.8
1.9
1.9
13.3
1.9
7.6
1.9
1.9
1.9
3.8
1.9
7.6
3.8
1.9
1.9
1.9
1.9
39.9
49.4
3.8
3.8
1.9
1.9
87.4
3.8
1.9
1.9
3.8
3.8
1.9
3.8
3.8
1.9
3.8
1.9
5.7
1.9
30.4
test.pl: #!/usr/bin/perl -w
my $x = 0;
open X\,"\<test.txt";
while (\
} close X;
test.php: \<?
$x = file_get_contents('test.txt');
$x = explode ("\n"\,$x);
$y = 0;
foreach($x as $s){
$y += $s;
print "$y\n";
}
?>
anyway compare return of php and perl:
Migrated from rt.perl.org#64762 (status was 'rejected')
Searchable as RT64762$