According to Chris Nandor: > > #!perl > use Benchmark; > $eq = q{if($^O eq 'MacOS') {$x = 'hey1'}}; > $re = q{if($^O =~ /mac/i ) {$y = 'hey2'}}; > timethese(1000000,{eq=>$eq,re=>$re}); > __END__ > > Benchmark: timing 1000000 iterations of eq, re... > eq: 10 secs (10.92 usr 0.00 sys = 10.92 cpu) > re: 19 secs (19.35 usr 0.00 sys = 19.35 cpu) Ah! :-) Thanks Chris! :-) ***** Want to unsubscribe from this list? ***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch