package Utils; =head UTILS =cut use Moose; use Carp qw/carp/; use Sub::Exporter -setup => { exports => [ qw(normalize bounds min max) ] }; sub max { my ($value, $compare) = @_; } sub min { my ($value, $compare) = @_; } sub normalize { my ($value, $compare) = @_; }
No comments:
Post a Comment