+use strict;
+use warnings;
package Devel::REPL::Plugin::Timing;
+# ABSTRACT: Display execution times
+
+our $VERSION = '1.003030';
use Devel::REPL::Plugin;
use Time::HiRes 'time';
-use namespace::clean -except => [ 'meta' ];
+use namespace::autoclean;
around 'eval' => sub {
my $orig = shift;
__END__
-=head1 NAME
+=pod
+
+=head1 SYNOPSIS
+
+ # in your re.pl file:
+ use Devel::REPL;
+ my $repl = Devel::REPL->new;
+ $repl->load_plugin('Timing');
-Devel::REPL::Plugin::Timing - display execution times
+ # after you run re.pl:
+ $ sum map $_*100, 1..100000;
+ Took 0.0830280780792236 seconds.
+ 500005000000
+
+ $
=head1 AUTHOR
Shawn M Moore, C<< <sartak at gmail dot com> >>
=cut
-