Select Code to Download

davido:~/scripts$ perlbrew exec --with perl-5.10.1 perl mytest.pl
Perl version: 5.010001
...
retn 11013216/s   3%   --

(25000000, 25000000)

use strict;                      
use warnings;                    
...
});                              
                                 
print "\n($x, $y)\n";