Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris
 
PerlMonks  

Comment on

( #3333=superdoc: print w/ replies, xml ) Need Help??
#!/usr/bin/perl -w use strict; use LWP::Simple; # Popular currencies are: USD, GBP, EUR, and JPY. my ($amount,$cf,$ct) = ($ARGV[0],$ARGV[1],$ARGV[2]); $_=get("http://www.oanda.com/converter/classic?value=$amount&exch=$cf& +expr=$ct"); s/^.*<!-- conversion result starts//s; s/<!-- conversion result ends.*$//s; s/<[^>]+>//g; s/[ \n]+/ /gs; print $_, "\n" =head1 NAME CEG - Currency Exchange Grabber =head1 SYNOPSIS perl ceg.pl 50 USD JPY =head1 DESCRIPTION Here is a rough break-down of what each of the ARGV's are needed, +and mean: perl ceg.pl ($amount) ($cf - convert from) ($ct - convert to) This progam's use and reason for being created, is simply for anyo +ne that wants to be able to check the exchange rates for different types of mone +y, such as from other countries. Say one was going on a trip to Japan, and they l +ive currently in the United States. They would need to find out how much money the +y should bring, in order to have a good amount, and there isn't an easier way (alm +ost) than to just enter in the amount you want converted using CEG and telling it to + convert from what type of money, to the other country's money. It is a very simple program, and is really the first time I have u +sed LWP to do something (useful,) so it could have a lot of new features to add +in the future, and possible bug fixes, or efficiency caveats that could be changed, a +nd so on. =head1 POPULAR CURRENCIES Here are a few popular currencies you can use: USD - US Dollars GBP - UK EUR - EURO JPY - Japanese Yen You can find more at: http://www.oanda.com =head1 HISTORY Derived from a snippet from mitd: http://www.perlmonks.org/index.pl?node_id=1553&lastnode_id=10799 +8 Developed by Andy summers on 28/08/2001 =cut

In reply to Currency Exchange Grabber by bladx

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.
  • Log In?
    Username:
    Password:

    What's my password?
    Create A New User
    Chatterbox?
    and the web crawler heard nothing...

    How do I use this? | Other CB clients
    Other Users?
    Others pondering the Monastery: (17)
    As of 2015-07-02 12:46 GMT
    Sections?
    Information?
    Find Nodes?
    Leftovers?
      Voting Booth?

      The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









      Results (36 votes), past polls