Select Code to Download

[snip]
%        my @old_body = split(/\b/, $old_body);
...
%            }
%        }
[snip]

%Time ExclSec CumulS #Calls sec/call Csec/c  Name
 47.5   46.88 46.888 123881   0.0000 0.0000  Algorithm::Diff::_replace
+NextLarge
                                             rWith
...
 0.02   0.020  0.020      1   0.0200 0.0200  DBI::connect
 0.01   0.010  0.010      9   0.0011 0.0011  vars::import
 0.01   0.010  0.010      1   0.0100 0.0100  Apache::Session::DESTROY