James Hatridge wrote:
> Rates as of 2002.08.13 20:25:28 UTC (GMT). Base currency is EUR.
> USD United States Dollars 1.01756 0.982743
> GBP United Kingdom Pounds 1.56297 0.639808
> AUD Australia Dollars 0.546791 1.82885
>
> What I want is this;
>
> 2002.08.13 USD 1.01756 0.982743
> 2002.08.13 GBP 1.56297 0.639808
> 2002.08.13 AUD 0.546791 1.82885
Here's a nifty little perl script that does it.
(It's a filter: reads from stdin, writes to stdout.)
my $date = '(no date)';
$, = "\t";
$\ = "\n";
while (<>)
{
/^Rates as of (\S+)/
? $date = $1
: print $date, /^(...).*(\d+\.\d+).*(\d+\.\d+)/
}
--
John Douglas Porter
-
To unsubscribe from this list: send the line "unsubscribe linux-newbie" in
the body of a message to [EMAIL PROTECTED]
More majordomo info at http://vger.kernel.org/majordomo-info.html
Please read the FAQ at http://www.linux-learn.org/faqs
