Help for this page

Select Code to Download


  1. or download this
    ($tag)=split (/\|/,$data,2);
  2. or download this
    $tag=substr ($data,0,index($data,'\|',));
  3. or download this
    Benchmark: timing 1000000 iterations of split, substr...
     split:  8 wallclock secs ( 6.93 usr +  0.00 sys =  6.93 CPU) @ 14
+4279.32/s(n=1000000)
    substr:  1 wallclock secs ( 1.54 usr +  0.00 sys =  1.54 CPU) @ 64
+8088.14/s(n=1000000)