Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl: the Markov chain saw
 
PerlMonks  

How do I convert a number to a fraction and vice versa?

by PodMaster (Abbot)
on Jul 26, 2003 at 10:28 UTC ( #278079=perlquestion: print w/replies, xml ) Need Help??

PodMaster has asked for the wisdom of the Perl Monks concerning the following question: ⭐ (numbers)

Originally posted as a Categorized Question. Body may be blank.

  • Comment on How do I convert a number to a fraction and vice versa?

Replies are listed 'Best First'.
Re: How do I convert a number to a fraction and vice versa?⭐
by PodMaster (Abbot) on Jul 26, 2003 at 10:32 UTC
    use Number::Fraction: 
    use Number::Fraction;

my @dimensions = ( 320, 240 );
my $aspect = Number::Fraction->new( @dimensions );

print join('x', @dimensions);
print $aspect;
print $aspect->to_num;

    [download]
    320x240
4/3
1.33333333333333

    [download]
[reply]
[d/l]
[select]

Back to Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://278079]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (6)
As of 2021-05-09 07:44 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Perl 7 will be out ...





    Results (100 votes). Check out past polls.
    Notices?