Curl & Perl & Web-Money

Сидя в субботний вечер, от нефиг делать накатал такой «парсер» для узнавания курса вывода WMZ на одном сайте.

1
curl http://ukrwebmoney.com/rates.js | perl -ne 'if (/out(.*?)([\d+][\.][0-9]{2})/) { print "Вывод WMZ: ".$2." UAH\n"; }' > rate && clear && cat rate && rm -f rate