freedomxcruiser has asked for the wisdom of the Perl Monks concerning the following question:

This node falls below the community's minimum standard of quality and will not be displayed.

Replies are listed 'Best First'.
Re: Need Help with Perl Code
by ww (Archbishop) on Sep 23, 2017 at 23:45 UTC

    You must have PM confused with "The Lazy Students' Plagarism Sources."

    Good of you to state you question in a way that makes it utterly clear that you're asking us to do your homework.

    Good... that we don't do that. You'll learn little or nothing if we do it for you.

    But

    we will help you if:
    • Your show some effort; ie, post your own code that begins to attack the problem. Be sure to include output and/or any errors or warnings.
    • Explain why the result is unsatisfactory... and
    • Ask for help on a specific problem. That, we'll be glad to steer you in the right direction.

    (You may also want to read such site-FAQs as On asking for help, How do I post a question effectively? and Writeup Formatting Tips.)


    Yet another gimmé request!
    Sorry, we expect SOPW to seek wisdom, not to ask us to do so for them.

Re: Need Help with Perl Code
by davido (Cardinal) on Sep 24, 2017 at 00:24 UTC

    For what purpose are you taking this course?


    Dave

Re: Need Help with Perl Code
by karlgoethebier (Abbot) on Sep 24, 2017 at 09:34 UTC
    "...The Currency Converter in Chapter 2..."

    May be this is from Beginning Perl by James Lee?

    If so you find some sources here.

    But keep in mind what a wise prof told me many years ago: "Sure, you can cheat - if you really can explain the solution..."

    Do yourself a favor and find your own solution.

    Regards, Karl

    «The Crux of the Biscuit is the Apostrophe»

    perl -MCrypt::CBC -E 'say Crypt::CBC->new(-key=>'kgb',-cipher=>"Blowfish")->decrypt_hex($ENV{KARL});'Help

Re: Need Help with Perl Code
by hippo (Archbishop) on Sep 24, 2017 at 09:00 UTC
Re: Need Help with Perl Code
by Anonymous Monk on Sep 24, 2017 at 07:29 UTC
    On Windows
    perl -e "printf \"%.2f\n\",$ARGV[0]+0.005"
    Stored as $ARGV[0]; returned with two decimal place accuracy (with roundup) via printf.