—our
$AUTHORITY
=
'cpan:SCHWIGON'
;
# ABSTRACT: benchmark - perl 03 - operator
$Benchmark::Perl::Formance::Plugin::PerlStone2015::03operator::VERSION
=
'0.002'
;
use
strict;
use
warnings;
#############################################################
# #
# Benchmark Code ahead - Don't touch without strong reason! #
# #
#############################################################
sub
main
{
my
(
$options
) =
@_
;
my
$results
;
eval
{
$results
= {
};
};
if
($@) {
warn
$@
if
$options
->{verbose};
$results
= {
failed
=> $@ };
}
return
$results
;
}
1;
__END__
=pod
=encoding UTF-8
=head1 NAME
Benchmark::Perl::Formance::Plugin::PerlStone2015::03operator - benchmark - perl 03 - operator
=head1 AUTHOR
Steffen Schwigon <ss5@renormalist.net>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2016 by Steffen Schwigon.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut