Acme::Hyde - Hyde Calculator

Acme-Hyde documentation Contained in the Acme-Hyde distribution.

Index

Code Index:

NAME

Top

Acme::Hyde - Hyde Calculator

SYNOPSIS

Top

    use Acme::Hyde;
    to_hyde(180); # => 1.15
    from_hyde(1.15); # => 180

DESCRIPTION

Top

Hyde Calculator

BUGS AND LIMITATIONS

Top

SEE ALSO

Top

http://kumaniki.blog76.fc2.com/blog-entry-161.html

AUTHOR

Top

Tetsunari Nozaki <nozzzzz __at__ gmail.com>

LICENCE AND COPYRIGHT

Top

Copyright (c) 2007, Tetsunari Nozaki <nozzzzz __at__ gmail.com>. All rights reserved.

This module is free software; you can redistribute it and/or modify it under the same terms of Perl itself. See perlartistic.

Acme-Hyde documentation Contained in the Acme-Hyde distribution. 
package Acme::Hyde;

use warnings;
use strict;
use POSIX;

use base qw/Exporter/;
our @EXPORT = qw/to_hyde from_hyde/;
our $VERSION = 0.04;

sub to_hyde {
    my $cm = shift;
    my $hyde = sprintf("%.2f",$cm/156);
    return $hyde;
}

sub from_hyde {
    my $hyde = shift;
    my $cm = ceil($hyde*156);
    return $cm;
}

1;
__END__