Advertisement
Guest User

Untitled

a guest
Aug 2nd, 2014
188
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Perl 0.29 KB | None | 0 0
  1. # server.pl
  2. use Time::HiRes;
  3. app->hook(before_dispatch => sub {
  4.   app->defaults(request_start_time => [gettimeofday]);
  5. });
  6.  
  7. # index.html.ep
  8. % my $request_timer = begin
  9.   <p>Page served in <%= Time::HiRes::tv_interval($request_start_time) %> seconds.</p>
  10. % end
  11. <%= $request_timer->() %>
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement